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4. RESTRACT 


TWO SEPARATE DIAGNOSTIC PROGRAMS ARE PROVIDED FOR THE OLII-E 
ta RUS anes ae ee fa” OZOLA (GLLI-E OFF oie 
S) AND MAINDEC DZ0L8 (OL11 S). THE 


L ON L ¥ OFF 
T TESTS ALL wae -E LOGIC . THE OFF Line TESTS DO NOT REQUIRE 7H 
13 oF 3 Rob Ra Spec AL SompE R CON 1? H2iS I st aed 
tHE NCTE | rebts ae P ESCENTIALLY aera. RELIABILITY TESTS RE- 
Mer ING HE USE OF SRSDERS AND A SUITABLE TERMINAL DEVICE. 


THE DL11-C wt DL11-D CAN ALSO BE TESTED WITH nes OFF LINE TEST. 
THESE ARE BOTH TESTED _IN MAINTENANCE MODE AND ONLY THOSE TESTS 

MARKED C,D_IN THE TEST NUMBER ARE EXECUTED. IN ORDER TO TEST CANO o 
VERSIONS IT IS NECESSARY TO MODIFY THE TASLE AT LOCATION 1300 SCCORDING 
TO THE INSTRUCTIONS CONTAINED THERE. 


TESTS WHICH ARE NOT EXECUTED FOR OLLIC+D CAN BE PERFORMED BY 
ei At | Boe: SWITCH OPTION (SR9), TEST 56 IS A DATA TEST WHICH 
R CABLE TESTING DL11-D° s, nHARNING==8 FAILURE IN THIS TEST 
say tae: DUE TO A SPLIT BAUD RATE OF RCVTR/TXVTR. 
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THIS DOCUMENT DESCRIBES THE OFF LINE TESTS. 
THE AVAILABLE TESTS ARE: 
PRGO INPUT OUTPUT LOGIC a rs 


00 > JOU. 


REQUIREMENTS 

EQUIPMENT 

A. POP 11 SYSTEM 

OLII-E OR DL1I1-C OR DLII-0 


SPECIAL JUMPER CONNECTOR H 3i 
Fo DETAILED DESCRIPTION? I 


é.2 STORAGE 


THIS PROGRAM USES ALL OF CORE (4K) EXCEPT THAT AREA RESERVED 
_ FOR THE BOOTSTRAP AND ABSOLUTE LOADERS. 


3. LOADING PROCEDURE 
THE ABSOLUTE LOADER IS USED TO LOAD THE PROGRAM. 
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DO1 


HIS sa HAS BEEN MODIFIED TO RUN WITH OR WITHOUT 

BRO CESSOR. 
A CO NEOLE MACHINE IS USED; THEN THE PROGRAM 
THE HARDWARE SWITCH Meehet an 


F_A CONSOLE I THE P 
RUTOMATICALLY LOOKS AT THE Zon ENte 5 oF [bear ion 
SOFTSR (176) AS A SWITCH REGISTER. 


IT’S THE RESPONSIBILITY OF THE OPERATOR p. =e UP 
THIS LOCATION PRIOR TO STARTING THE PROGRAM 


BEFORE STARTING ANY OF THE SELECTABLE PROGRAMS MAKE SURE 

THAT THE TTY IS_IN REMOTE MODE; AND T THE PROGRAM SELECTED 
LEGAL PROGRAM IE. NO.0-4 oTNPRUTSE AN ERROR MESSA 

er OCCUR. TERMINATE ALL INPUTS. WITH & CARRIAGE RETURN. 


A OF DEVICES op wth. BE Bbi<? a RUN TIME. THIS MAP WILL NOT 
7 shee RT LOCATION 200. a RESTART FROM THIS LOCATION WILL CAUSE 


THE M F DEVICES TO BE TYPED OUT AGAIN AND THEN A NORMAL START 
WILL Secu UR. 






















4.1 PRGO INPUT/OUTPUT LOGIC TESTS 


R. LOAD ADDRESS = 900200 (RESTART LOAD ADDR. = 000204) 
TYPE PROGRAM NUMB 
THE DIAGNOSTIC WILL IDENTIFY THE PROGAM YOU SELECTED, ; 
DISCONNECT THE OLII-E FROM THE MODEM AND INSERT THE JUMPER CON- 
NECTOR IN THE MODEM END CE THE CABLE,AND PRESS CONTINUE. 
NOTE, IF THE CABLE IS LEFT CONNECTED TO THE MODEM THE FOL- 
MOWING TESTS. Lett FAIL: 

AT22,AT23, ATES, ATO, A732, ATSE 


B. ie PROGRAM WILL TYPE OUT INSTRUCTIONS TO SET IN THE DESIRED 
R OPTIONS. PRESS ole WHEN THE OPTIONS ARE IN THE SR 
THE hg eng OPTIONS Al 
SR_O-& ROUTINE a BE ee (IF ENABLED BY SRS) 


SR? DISABLE 

$9 ring SELECTED R UTINE 

SR10 T_AT END 4 CURES TEST 
SR11 INHIBIT ITERATION 


SRle SELECT LINE NUNGER AND LOCK ON IT 
SR13 INHIBIT PRINTOUT 


SRiS ALT ON ERROR. “ 
C. THE PROGRAM WILL NOW REQUEST THE LINE @{IF SRl2=1) YOU WISH TO 
TEST. TYPE THE LINE & AS REQUESTED, FOLLOWED BY A CARRIAGE RETURN. 
LINE NUMBER REFERS TO THE ADDRESSES TO WHICH THE DLLI-E RESPONDS. 


LINE 00 77561X LINE 10 77S71X LINE 20 77601X LINE 3C 77611X 


ee te eee ee eee oe 
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EOL 


LINE O1 27S68x LINE 11 77572x LINE 21 77602 LINE 31 7761 
& é H » 

CINE 83 S58eax Cine 15 S58ax CINE 35 S5e0ax Cine 3 

LINE 04 Z75G5x LINE 14 77575x LINE 24 77b0sx LIME 34 77615 
LINE 05 Z765X LINE 15 77876 LINE 25 Z7B0Gx LIME 25 77E1Gx 
CINE O& 77567xX 16 77577X LINE ob 77607% LIN= 36 77617% 
LINE 07 77570X LINE 17 77600X LINE 27 77610x 


THE PROGRAM WILL NOW BEGIN 
ALL OL11°S WILL BE + She AUTOMATICALLY AND SEQUENTIALLY 
UNL a ris TS SELECTED. 
OTE: ALL LOGIC TESTS WILL _NOT BE RUN AUTOMATICALLY. 
THERE ARE TWO TE319 WHICH REQUIRE MANUAL INTERVENTION 
WHICH ARE USED TO TEST THE SPEED SELECTION SWITCHES. 


THESE ARE TESTS T34,T4O. TO EXECUTE THESE TESTS USE SR9 AND 


SR O-& TO SELECT THEM. 
REFER TO SECTION 5.1.2 FOR ERROR DESCRIPTION 
AFTER ONE COMPLETE PASS THE ELL WILL RING 
FOL BY “END PASS =" WITH THE NUMGER 


LOWED OF 
PRESS COMPLETED SINCE “PROGRAM LAST STARTED AND 
THE DEVICE ADDRESS UNDER TEST AND ITS TRAP VECTOR. 


PRG - TRANSMITTER SCOPE LOOP 


A. 


C. 


LORD BOORESS = 090200 (RESTART = occ204) 
THE piacnosT Ic uit IDENTIFY THE PROGRAM YOU SELECTED, AND 
REQUEST THE LINE # YOU WISH TO TEST. TYPE THE LINE & AS RE- 
QUESTED, FOLLOWED BY oF CARRIAGE RETURN. 


THE PROGRAM WILL REQUEST @ CHARACTER CODE, AND A 

TIME. THE CHARACTER CODE IS THE DATA THE OL11-E W 
AND THE DELAY IS THE TIME ELAPSED BETWEEN SUCCESS 
MISSIONS OF ONE CHARACTER. 


THE PROGAM WILL RUN WITHOUT ERROR OR END TYPEOUTS. 


TRANSYZ1 T 


DELA 
ILL 
IVE TRANS- 


PRG2 - RECEIVER SCOPE LOOP 


A. 


—- 


LOAD aha = 000200 (RESTART = 000204) 
TYPE PROGRAM N R= 

THE DIAGNOSTIC WILL IDENTIFY THE PROGRAM YOU SELECTED, ANC 
REQUEST THE LINE ® YOU WISH TO TEST. TYPE THE LINE # AS REQ- 
UESTED, FOLLOWED BY A CARRIAGE RETURN. 


THE PROGRAM WILL REQUEST A ye CHARACTER CODE, AND A DELAY 
TIME. THE CHARACTER CODE IS THE DATA THAT THE OL11-E WILL BE 


TRANSMITTING AND THE DELAY IS THE ELAPSED TIME SETWEEN SUCCES- 


SIVE CHARACTERS. 
THE PROGRAM WILL NOW RUN WITHOUT ERROR OR END TYPEOUTS. 





TESTING THE OLII-E OR C/D YOU SELECTED. 
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4.4 PRG3 - SINGLE CHARACTER MAINT MODE DATA TEST 


a. ibe RODRESS = gg200 (RESTART = 000204) 
HE DIAGNOSTIC WILL IDENTIFY. THE PROGRAM YOU SELECTED, AND 
REGU EST THE LINE # YOU WISH TO TEST. TYPE THE LINE & AS REO- 
UESTED, FOLLOWED BY A CARRIAGE RETURN. 


B. THE PROGRAM WILL REQUEST A TEST CHARACTER. TYPE THE TEST CHAR- 
ACTER, FCLLOWED BY A CARRIAGE RETURN. 


C. a WILL NOW RUN CONTINUOSLY REPORTING ANY DATA FAIL- 


foruruturururn 


fururutufute 


Tat pa bad 6h — 
fMNMUN GIT OWID IO UN 2 Ofte 


MWUTVIOTUrUTUFONn oreo 


7 

: 4.5 PRGY - SPECIAL BINARY COUNT MAINT. MODE DATA TEST 

3 A. LOAD ADDRESS = 000200 

2 TYPE PROGRAM NUMBER = 

3 THE DIAGNOSTIC WILL Ipefir2Fy THE PROGRAM YOU SELECTED, AND 
239 REQUEST THE LINE & YOU WISH TO TEST. TYPE THE LINE & AS REG- 
ec UESTED, FOLLOWED BY A CARRIAGE RETURN. 
345 B. THE PROGRAM WILL BEGIN TESTING THE LINE YOU SELECTED. 
243 AND REPORT ANY DATA ERRORS. 
ev 
245 
eve 5 PROGRAM DESCRIPTIONS 
eve 5.1 PRGO - INPUT/OUTPUT LOGIC TESTS 
559 THE INPUT/OUTPUT LOGIC TESTS CONSIST OF 57(8) ROUTINES WHICH 
25} MAY BE RUN IN SEQUENTIAL ORDER OR TNOIVIDUALL Y LOOPED (SEE 
22 SECT R SWITCH SETTINGS). THE JUMPER CONNESTOR MUST 
53 Be INSERTED BEFORE STARTING IF OL1I-E. 

€ 

255 

56 5.1.1 ROUTINE DESCRIPTIONS 

e> 

ose ROUTINE TESTS 

e353 ” 

355 aTo-AT3 RODRESSABILITY OF csRs $ DBRS 

El AT4-AT27 DIDDLES ALL BITS IN THE CSRS AND 

Dee CHECKS THA At THEY EAN BE READ-WRITTEN 
ze PROPERL 

Sec AT31-AT32 PROPER OPERATION OF RESET INSTRU TION 
Ee aT33 PROPER OPERATION OF 

eb AT34 PROPER OPERATION OF Shanna SPEED SELECTION 
2E AT35-AT37 PROPER OPERATION OF DONE BIT 

ATHO PROPER OPERATION RECEIVER SPEED SELECT 





AT4) PROPER OPERATION OF DATA OVERRUN 
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GO1l 


Hi42-ATS2 PROPER OPERATION OF INTERRUPTS 
ATS3 READING RXCSR DOES NOT CLEAR DONE 
ATSY ERROR CAUSES INTERRUPT 

ATSS DATA TEST MAINTENANCE MODE 

ATS DATA TEST WITH JUMPER 

ATS? PROPER OPERATION OF BREAK BIT 


ERROR DESCRIPTION 


IF A ROUTINE FAILS AND THE INHIBIT PRINTOUT SWITCH IS NOT 
ENABLED (SRi3) A PRINTOUT RESULTS. THE PRINTOUT FORMAT IS: 


TCROUTINE®) PC=(PC_OF ERROR CALL) RXCSR=(ADDRESS CF DEVICE UNDER TEST) 


AND AN ADDITIONAL,MESSAGE (IF APPLICABLE) 
TOOS PC=XXXX RXCSR=XXXX 


Tlee PC=XXXxxX arene DATA S/B:---WAS: --- 
INDICATING A DATA ERROR 


TQ RESUME TESTING PRESS CONTINUE. 
IF_THE VECTOR PROVIDED BY THE INTERRUPTING DLIi-E IS INCORRECT 
Rig? es WRONG LOCATION WILL OCCUR AND AN ERROR MESSAGE 


JUMPER CONNECTOR 


THE JUMPER CONNECTOR TESTS THOSE F/F'S, GATES (RING INDICATOR, 
CARRIER TRANSITION, CLEAR TO SEND, AND’ SUPERVISORY RECEIVE 
DATA) WHICH CANNOT'BE TESTED UNLESS A DATA SET IS ACTUALLY 
CONNECTED TO L1I-E. TO TESTING OLII-E LOGIC 
THE JUMPER ALSO TESTS CABLE WIRING TO/FROM THE Dil1-E DATA 

THE FOLLOWING TESTS WILL FRIL IF THE CRELE 1S NOT 


SET. E 
INSALLED IN THE DL1 
AT22,AT23,AT2S,AT3IO,ATI2, ATS 


PRG1-TRANSMITTER -SCOPE LOOP 


THE PURPOSE OF PRG] IS TO ALLOW SCOPING OF TRANSMITTER 
FUNCTIONS IN A RUN CONDITION USING USER SPECIFIED DLI1-E 
PARMATERS AND DATA. NO ERROR PRINTOUTS ARE PROVIDED. 


PRG2-RECEIVER SCOPE LOOP 
THE PURPOSE OF PRG2 IS TO ALLOW SCOPING OF RECEIVER FUNCTIONS 


IN A_RUN CONDITION USING USER SPECIFIED DL11-E PARAMETERS 
AND DATA. NO ERROR PRINTOUTS ARE PROVIDED. 
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-ENABLE ABS, AMA 
\ :DLI1-E,C/D DIAGNOSTIC PROGRAM (OFF LINE TESTS) 
:PROQ- INPUT. wer Logie, TESTS 
| PRG comin TER SCOPE 
SDRGS- SINGLE CHARACTER MAINTENANCE NODE DATA TEST 
;PRGH- SPECIAL BINARY COUNT MAINTENANCE MODE DATA TEST 
: STANDARD SR SWITCH OPTIONS (SWITCH SET TOA1 ) 


:SRIS- He ON ERROR 


:5 
SeRIa- INHIBIT PRINTOUT 
;SRl2- SELECT LINE aR AND LOCK ON IT 
’ :SR11- pg ar ITERA 
:SR10- H T END CURRENT TEST, TEST NO. IN DATA LIGHTS 
:SR9- SELECT # 


OUTINE. 
:5R7-_DISABLE STALL MODE AND RUN FULL sPepD , 
;SRb THROUGH SRO - NUMBER OF ROUTINE TO BE SELECTED. 


STANDARD CONFIGURATION 
:CHARACTER LENGTH 8 
: STOP ‘CODE 5 
005900 =Q 
330 eed 005705 ERTP ; UNASSIGNED TRAP 
Rana 005706 MACHER: x bee ;SP OVERFLOW, BUS ERROR TRAP 


334 0000190 005706 i ;RESERVED INSTRUCTION TRAP 





009014 005706 ERTP ; TRACE TRAP 
397 009036 000140 14C 
298 0000e0 006014 MAPYEC ; TRAP TO MAP VECTOR 
399 0000e2 000340 PRTY7 
400 900924 006234 PFAIL ;POWER FAIL TRAP 
401 000926 900340 PRTY7 


462 000030 002766 EMTINT sEMT TRAP 
403 900032 T 


yo? o9004e 009000 HALT 


498 Coo04s .=46 

40S 900046 O053ie LOGIC 

419 -REPT 117. 
411 4* ; TRAP TO TRAP REPORTER 
Siz 

413 .ENDR 

414 

415 

416 ;EQUATE STATEMENTS 
417 177776 PSW=177776 
418 CO1176 SPBOT=1176 
419 000240 NOP=240 


Lnqusaniepuieediinnenen: 








MAIN. 
DZDL 








470 000174 
471 000176 


473 090200 
475 000204 
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090909 
100090 


100009 


000174 


0 
pea 001640 
000137 OO06414 


eS-FES-7& 10:49 PAGE 9 


SRPTR: 
SOFTSR: 





DOMOOWMIOOWIODOMWWOMODWOWIzZO 
DA tt 4 0 0 DD 


VA 
WNO~—mw 
eT 

7 


=5726 
POPSPe=0226e6 
PRTY7=340 


TIME TX=EMT+20 
ATLAST=-1 
CD=100000 


LIST © 
174 


177570 
000000 


.=200 
JMP aeSTARTZ 
@eRESTART 


IMP 









;POP THE STACK. SAME AS TST (6)+ 
POP STACK TWICE. SAME AS CMP (6)+, (6)+ 
:PRIORITY LEVEL DEFINITIONS 


;FLAG FOR C/D TESTS 


;GO TO START OF PROGRAM. 


MAIN. 


KO1 
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DZDLAF.P11 





001200 .=1200 
: DEVICE pune ae Ls 


ib38 pi To 13 SF 1 BY MAPPER IF pevice NOT F 

TEST THAT CIN NOT F we he - BITO IN THAT D Hee ADDRESS 
IN THIS TABLE AFTER MAPPI 
eertrtiiittt iti ttt 


001200 (RXCSR) 


NOUILC WMO 

OVVVVVVOD 

RERSeRRR 
am 


SZZAZAZAZZAZZZZ Ze 
RnaRRARAAARAR © 


C DR 
VICE ADDRESS 
ICE ADDRES 


~ 
=z 
m 
MMmMmmMmmmim 
S55 


OVVVVT900 


apt Ant So Sul Gk Sol Gk Sal pk Sol ed Sod ant bod ot 
Ww 
w 


NOMUILCWIM+O 


Oo 
oO 
mm 
<< 
onan) 
O00 
mmm 
DD 
SaB 
3S 
AD 
m 
mw 
nw 


1 
1 
l 
1 
1 
1 
1 
1 
. @ 
e 
£ € 


3 VICE ADDRESS (RXCSR) 
: 17 : 37 SPECIAL ADDRESS FOR XOR 
901300 177777 : : XX DEVICE ADDRESS (RXCSR) 
CHARACTER LENGTH, PRIORITY, C/D MASK 
‘INITIALLY SET FOR OL} if, urs CHARACTER, LENGTH=8 
“BIT 15 SET TO At T LIN oLii-c 
RTCR OL = 4 R ORACTER LENGTH = 8 


; A LINE 
iBITe 0-7 = CHA RACTER MASK EX.-377=8, 177=7, 77=6, 37=5 


eirititiiititittt ee 
001302 O403 émaso: ay eae sLINE ° CHARACTER MASK, PRIORITY, C/D FLAG 


040377 €/D FLAG 
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CHARACTER MASK, 
CHARACTER MASK, 
CHARACTER MASK, 

CHARACTER MASK, 


bb eh 
UWICWMe-O 


16 CHARACTER MASK, 


E 17 CHARACTER mak’ 





‘LINE 36 CHARACTER MASK: PR 
LINE 37 SPECIAL ADDRESS FOR XOR ’ 


; MASK FOR DEVICE U 
MASK FOR CHAR LENGTH FOR DEVICE UT 
MASK FOR MAX RANDOM STALL 





iecenenaninenepneteinaditiindiatabes 





vvvD 


Uv 
DBDwDwDwDwD 


ma] 


AH AA at tt 
<<~<<<~<<~<~<~<-<<~<<<<<<~«<~<< 


wv 


ms] 


vv 
z2zww 


;RECEIVER UNDER TEST 
;RECEI VER BUFFER UNDER ue 





: TRANEMITTER PRIORITY LEVEL UT 





;LSR CSR 
;LSR BUFFER 
:LSP CSR 
:LSP BUFFER 


;LSR IN Ly al VECTOR 
;LSR PRIORITY LEVE 
;LSP abd To VECTOR 


;LSP_PRIORITY LEV 
;CONTAINS CURRENT 


ROGRAMs 
: CURRENT PROGRAM START ADDRESS. 
; CONTAINS ADDR OF aeent TEST. 


: XT TEST. 
CONTAINS CURRENT pispet aoe COUNT 
:CONTAINS CURRENT SCOPE POIN 


:PS SAVED FROM TRAP TO EMT ROUTINE 
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OZOLAF.P11 
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588 001472 


27(732) 


000000 


oo40s4 
000000 


012737 





001176 
CO0006 


oCOc04 
001670 900004 
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FMAP 


EMTTAS: 


~ STARTZ: 


ee . 
PRGTAB: PRGO 
PRG1 


6,-(SP3 :SAVE CURRENT VECTOR 








s MAPPING FLAG, 1= MAPPING IN PROGRESS 
T ADDRES 





ART_ADDRESS 
INCORRECT PROGRAM SELECTED 


;POINTER TO TYPEOUT ROUTINE 

:POINTER TO CHAINED ag 3s ROUTINE 
POINTER TO RANDOM STALL ROUTINE 
:POINTER TO ERROR ROUTINE 


;POINTER TO ERROR HALT ROUTINE. 


#SPBOT,%6 


;SET UP TIME OUT VECTOR 





MAIN. 
ZDLAF . 


MACYL1 27 
Pll 


001662 


agie78 


001676 


oosol2 
002016 


002040 


002044 


(732) 


005777 


Bie7a? 


022626 


oocc00 
TEx, 


000137 


012706 


015034 


eS-FEB-76 


178306 


000176 


000004 


177777 


002044 


eae 

77077 
anenie 
002044 


001176 


001626 


000174 


90of04 


001276 


002016 


0201eS 


052123 


001276 


000024 


e$: 


MESSI: 


XORFLG: . 


XORA: 


START 


JNP JeSTART 
ASCII <15><12>*YOU ARE ON AN XOR TESTER’ 
EVEN 
WORD O 
CMP (16 )+, (%6)+ 
MOV (46)+. 084 
MOV t-1 S4XORAOO 
CLR a#XORF 
IMP SeCTeRT: 
MACR TSTAA AX,B,C,D 
prepress ersaaeeesacensacessacenens ecomee eS 
AT’D’ “ADDRESS OF NEXT TEST % 
B ‘ITERATION COUNT x 
oxi :SCOPE ENTRY POINT . 
. a ma RR ENT GSES MON 
N 
-MACR  TSTA 
TSTAA  AX,B, waltz, S42, \X+1 
ENDM 
MOV #SPBOT, %6 ;SET BOTTOM OF SP STACK. 
MOY #PFAIL: 24 
CLR FOUNDV 
CLR MAP 
JSR %7 ,CLRCD CLEAR DEVICE UT PARAMETERS 
JSR “7° OVRLAY : OVERLAY TRAP 
TST FTTTLE ‘TITLE PRINTED AND MAP MADE 
BNE START! :¥ES, SKIP OVER THIS 
TYPE 
MTIT 
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NO1. 























; TRY TO REFERENCE Le ot 

HARDWARE SWITCH a 

spr te NQ Tine aut "Rap OCCURR 

; CHANGE WITC GISTER POINTE 
:T0 0) A TO A SOF THARE SWITCH REGISTER 


SRESTORE THE STACK 
RESTORE TIME OUT VECTOR 


JSRPTR 


ie 

#SOFTSR,SRPTR 

(6)+,(6)+ 
)+,4 


(“%6)+ 
HpaoOn. gaxoRA0D 
#-1, J8XORF 


etn 
Ayewr 
eee e 





MSIN 


749 


esr a-a aoa 
> *0-< b= p= p< 6-0 9-0 & Oo 


0D ION £ GTUe--C9 


ot ee 


Ing 
i] rururer 
wr tH “— Hy 


~~ 


a 4 
-'f) 
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Fe 
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Bloiiors 


iaidshinstolarchlotcncharciots 
2S TOR LS ESSERE ES 


ae 


09 
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Biren 


Re 


i 
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fururu 
obo 
OrrnMega 
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001630 


09579 


003635 


001200 
CC038! 
003614 
001200 
001614 


006572 


001309 


00042 


005302 
COig2s 


- 002344 
fr 


00590: 
O014SE 


003554 


177770 
001450 


AAS 5F 
004 


oscocs 


MAPA: 


MAPNE: 


MAPOK: 


START: 


2} 
MAPERR: TY 
M 





~~. BOe 


FTITLE 
FNONE 


SMAPNE, MACHER 
ae 


#RXCRO 


MAP OK 
sBITO,<4)+ 


FNONE 


(])-¢ 
%1, #RXEND 
START2 
ae42 

od 


+6 
PRGXTL 
FTITLE 


START 
§1. PASCNT 


PSI 
RTNNO 





;CLEAR DEVICE PRESENT FLAG 
;SET UP NO DEVICE PRESENT RETURN 
:SET_UP DEVICE POINTER 

:LAST DEVICE 


“YES, EXIT 
:CLEAR ODD ADDRESS 
: TEST DEVICE 


sNOT LIVING 


;SAVE DEVICE ADDRESS FOR TYPING 


;SET HAVE DEVICE 


:RESET TRAPS 

SANY DEVICES PRESENT 

ZNO, ERROR 

515 DEVICE LIVING 

:NO, CHECK FOR END 

:CALCULATE LINE NUMSER UNCER TEST 


sYES, LOAD AND EXIT 


sE 
N 


NO OF TABLE 
0, LOOP 


sMONITOR LOAD 
sNO, CONTINUE 
:YES, EXIT 


;CALL FOR PROGRAM NUMSER, 


;READ IN PROGRAM NUMBER. 

-INPUT DATA To RO 
sLIMIT (SR) TO BITS 3-0 
:SAVE PROGRAM ¢ 





MSCYLi 
D2DLAF. Pil 


OCE376 


MSIN, 


082674 
cOeé7E 


gag 
IER EE BAL aWito be tg 
oO 
oO 
fu 
o 
- 
ao 


000721 
932777 


oo0g42 
Cecb2e 


25-FEB-7¢ 


001474 
001452 


oiocd 


002402" 


001456 
176756 


175470 
77500 


“OO1458 


176732 
V77777 


0051CC 


o40000 
001466 
c02016 
paces 


9p40d0 


001464 


co2000 


001456 
100009 


001000 
177777 
005122 


000506 


175520 


001462 


175426 


175316 


001462 


S$ 10:49 PAGE iS 


AETROY: 
GTRDOYX: 


GTRDYA: 


GTROAL: 


STSOyve: 


AUAINN: 
CHNAB: MOV 
CHNA: 


1$: 


8B 
CHNAA: il 


CHNE: 


XOR: 


COe 


aPRGTAB(D) 
KSTART, NXTST 
RERTP MACHER 
eee 
sSPBOT, “6 
PSW 


”e s FORWD 
#819, ISRPTR 
STROYU 


“7 INCRTN 
GETRDY 


#51714, 9SRPTR 


CHNA 

SCOPTR, a%é 
yee 
ae4,-(%8) 
#XOR, 384 
38177060 
eSiT11 gSRPTR 
CHNAA 


ICTR 
CHNAB 


eerie, , OSRPTR 


RTNNO, “0 
eBIT1$,28 


#9119, 9SRPTR 


(46)+, (ub )¢ 





;G0 TO SELECTED PROGRAM. 


sADOR OF IST ROUTINE TO NXTST 
RESET MACHER TRAP. 


;SET SOTTOM 
; ISSUE RESET. 
7RO 


OF STACK. 


LL FORWARD TO “NEXT™ FOUTINE. 
CHECK SELECT ROUTINE 


ANCH IF SELECT ROUTINE SWITCH IS SET. 
Renae 


j v 
NO CONTINUE 


THIS A C/D TEST 


NO. DO NEXT 


TEST 
;G0 RUN pd ROU 


NO GO. 


0 
: MASK «andi les 


; COMPARE RTN 


SWITCH 


TINE 
a te RTN SYPASSED. 
" 


NNO 1B 180) 
:8R ANCH IF ROUTINE. NOT FOUND YET. 
+8 RUN ROUTINE. 
LAST pil § 


0 
CHECK FOR 
‘RANCH IF 


NCT_L&ST ROUT 


INE. 
YES. INCORRECT ROUTINE SELECTED. 


START OVER. 


:CHECK FOR SCOPE OPTION. 
: BRANCH + Reve SW 


:SET UP T 
:RETU 


; TEST FOR XOR 


;TEST INMIBIT I 
:BRANCH IF INUI 


:DECREMENT ITER 


“ 


{FOF STACK TWICE 


ERAT 
Ty 1 
TION 
NOT 


sCHECK SELECT ROUTINE 


: BRANCH IF SELECT 
;sLAST TEST? 


RTN 


ION 
TE 


7 = 


NOT SET. 
TURN TO ROUTINE. 
N TO ROUTINE. 


SWITCH 
RATION SW SET. 
COUNT. 


evuny? 
Serva iC 


Su SET 


‘BRANCH IF NOT LAST TEST 


: PROGRAM END. 








G31 (9.000 IMU Lu 


8 
8 
8 
8 
3 
8 
8 
8 
8. 
] 
§ 
8 
§ 


\ 
1 
1 
1 
1 
1 
1 
1 
5 
E 
a 


wm 
Ure 


‘Gorururorururun 
IK KM KT oa 


e5-FEB-"S 


ooo004 


001402 
090004 


176460 


093054 


OC3216 





DO02 
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MOV ( . 1+, 084 
BR CHNAB 
:INIT FOR C’D - WITHOUT JUMPER RESET STARTS ASSEMBLING CHARACTER $ 
iSET MAINT, DELAY, CLEAR RX DONE 

SBINIT: TSt una ask C= 30 DEvIce 
SPL CDINX EXIT 
BIS e8IT2,aITXCSR oP MAINT BIT 
CeLAY “WAIT 1.5 SEC 
TST JRXBUF “CLEAR RX DONE 

CDINX: RTS 47 

FORWD: MOV NXTST, “5S sADDR OF NEXT ROUTINE TO 85. 
MOV: (5)>, RTNNO :GET NEXT ROUTINE NUMBER. 
MOV (5) +: NXTST :GET ADDR OF NEXT NEXT” ROUTINE. 
MOY (S)+, ICTR -GET ITERATION COUN 
MOV (5)+. SCOPTR :GET SCOPE LOOP oe POINTER, 
MOV “5, CURTST :ADOR OF NOW CURRENT TEST TO CURTST. 
RTS uP !EXIT FORWD SUBROUTINE. 

EMTINT: MOV 3x6, -(6) :GET SAVED PC. 
SUB #2, aN :DECREMENT PC SY 2. 
MOV a(6) aus 

EMTA: ASL a“ sEMT ARG_X 
BIC 8177001, axb REMOVE 7 "ea. 
ADD #EMTTAB. 32.6 TEORM EMT RIN ADDR. 
MOV 36), a%5 
IMP a(6)4 :G0 TO EMT ROUTINE. 


:SAVE REGS 2 TO 4 SUBROUTINE. 


SaveG: MOV (&)+,SVRPC :SAVE PC AND PSW. 
MOV (6+. SVRPSH 
MOV “4, -t6) ;SAVE_RESS 0 - 4 
MOV %3,-(8) ;IN STACK. 
MOV %2,-(6) 
MOV %1,-(6) 
MOV 40; -(6) 
MOV SVRPSW, (6) sRESTORE FC AND PSN. 
MOY SVRPC, -(8) 
RTI EXIT. 


SVRFC: OPEN 
SVRPSU: OPEN 
{RESTORE REGS 0 TO 4 SUBROUTINE. 


RSTRG: MOV (6)+,RSTPC sSAVE PC AND PSW. 
MOV (b)+, RSTPSW é 
MOV (6)+.%0 sRESTORE REGS 0 - 4 
MOV (Be ed :FROM STACK. 
MOV (6)+,%2 


MOV (6)+,%4 
MOY RSTPSW, -(6) sRESTORE PC AND PSW. 


| 
oO 








MAIN, 


OTDLAF.PL 





89S 003226 
003232 


wo 
ob ~* b= = = 0 bo oe 
© 


OWOODOOOWWWOW 


w.0.0 
fororoto 


MRCY.L 


503224 


lun OWONWU1E lone 
OQ 
oc 
CIC 
res) 
oO 
= 


Q1374§ 
d00092 
900990 
000009 


095037 


2S-FES-""5 


003114 


00627" 


001422 


006270 


003274 


003276 
003e74 


003276 


902276 


wee 


003274 


COL41E 


001426 
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MOV RSTPC,-(6) 
RTI 
RSTPC: OPEN 
RSTPSW: OPEN 
-ROUTINE TC 
iT eRy JSR 
MOY 3:6), STPRA+2 
ROO te, 3X6 
MOV RXVTR, “1 
STPRA: MOV #OPEN: (i)+ 
MOV RXLVL; (1)+ 
RTI 
} ROUTINE TO SET 
STLSPY: JSR 
MOY 58), STPPA+2 
add ab 
MOV tetas %1 
STPPA: MOV #OPEN, (1)+ 
MOV TXLVL, (1)+ 
RTI 
® ROUTINE TO ISSUE RESET. 
SRSETT: MOV 852525, %0 
COM 40 
MOV “0, SRSETT+2 
RESET 
RTI 
ANGE 
ROL “9 
ROL %0 
AOD RP2, 40 
MOV 19, RPI 
ROL 
ROL ~ 
ADD RP2, “0 
ROL As) 
ROL “9 
MOY 40, RP2 
MOV RP}, «0 
RTS % 
RPI: 1233 
RPe: 7622 


iCLRCD ~ CLEAR CURRENT DEVICE PARAMETERS 
LRCD: CLR TXBUF 


SET RECEIVER. INTERRUPT VECTOR AND PRIORITY 
Hovey vec TOS ADDR TO STPRA+E 


sEXIT 


P EXIT 


;SET vey ror ADDRESS 


:SET_P 
sEXIT 


TRANSMITTER INTERRUPT VECTOR AND PRIORITY. 
;MOVE VECTOR ADDR TO STPPA+2 
SET UP EXIT 


;SET VECTOR ADDRESS. 


-SET PRIORITY 
EXIT 


;DATA TO 
: COMPLEMENT (RO). 


Nes 
+ 
OQ 
wWZzwD 
DAO 
w 
m 
+ 
-y 
r- 


: DISPLAYED. EXIT. 
iran mn NUNGER ws te ROUTINE EXITS WITH NUMBER IN RE‘ 


sEXIT. 


NUMSER IN RO 

















? 
a 





. MAIN, bet 


OzDLAF aa | 


003340 


i 


966 BOsei9 


003516 


734 
ood000 


Bt 1800 


25-FES-7S 10:49 PAGE 19 
RIS “2 
j SUBROUTINE TO OUTPUT ASCII MESSAGE ON TELETYPE PRINTER, 
MOV x6," ;GET A ORESS THAT CONTAINS MESSAGE SDDRESS. 
occog2 ADD 82,0 :SET 
MOV : ADDRESS OF MESSAGE TO RO. 
90346 TYPA: MOV aie FyPOAT :GET ACTE 
105 003482 CHP #100, TYPORT ;CHECK FOR™a™ CHARACTER 
SNE TYPC ;BRANCH IFN 
RTI ; TERMING OR CHAR. DONE. EXIT 
OOOO4S OOS4G2 YPC: CNPB ANS, TYPDAT CHECK FOR"% 
ied BEQ yPF :BRANCH IF"%"" 
000043 003462 CHPS 849. TYPDAT NOT CHECK FOR"#™. 
BEQ TYPG : BRAN 
003416 . ISR 17 TYPO ; TYPE CHAR IN TYPDAT 
O03462 176012 TYPD: MCVB TYPDAT.aTPB OUTPUT CHARACTER 10 PRINTER 
176004 TST8 TPS WAIT FOR DONE FLAG. 
BFL ~y 
RTS “? sEXIT 
990015 OO3H62 TYPF: MOVE 815, TYPOAT SHOVE CARRIAGE RETURN CODE TO TYPOAT 
003416 JSR “2 TYPD ;GO_ TYPE 
000012 03462 TYPG: MOVB a2, TYPDAT :MOVE LF cOgE TO TYPDAT. 
O93416 JSR “47, TYPD :G0 TYPE CH 
BR TYPA 
TYPOAT: OPEN 
; SUBROUTINE TO OUTPUT A SERIES OF ASCII MESSAGES ON TELETYPE PRINTER 
TYPS: MOV xB, 20 :GE7 ADDRESS THAT CONTAINS MESSAGE RCORESS 
ooccce ADD #2,0%6 UPDATE T0_NEXT MESSAGE ADDRESS 
002512 MOY = a0, TYPSB ‘ADDRESS OF MESSAGE 10 TYPSE 
170777 003512 CMP #-1' TYPSB CHECK FOR TERD 
BNE TYFSA ;BRANCH IF NOT TERMINATOR. 
T : TERMINATOR 
TYPSA: TYPE CALL ON TYP SUB TO TYPE MESSAGE 
TYPSB: OPEN ADDRESS de MESSAGE GOES HER 
BR TYPS ;G0 PROCESS NEXT MESSAGE 
OVERLAY VECTOR GRE 
909300 ioxe LAY: MOV #300, %1 ;GET DLL1-E VECTOR SASE ADDRESS 
090392 MOV #302, %2 
900054 MOV 84,73 ; 
OVRLYA: MOV “2, (1)+ LOAD VECTOR WITH IOT ERROR TRAP 
MOV 43,(1)+ 
900904 ADD #4) x2 , 
001000 CMP = “1° #1000 ALL VECTORS SEEN LOADED 
BEQ OVRLYS 
BR OVRLYA 
OVRLYB: RTS sEXIT 
{SUBROUTINE TO READ OCTAL DATA FROM THE TELETYPE PRINTER 
ROCCT: MOV (SP), -(SP) ;MAKE ROOM FOR DATA WORD 
MOV ‘6, my SP ) 
MOV = 41, = (SP) 
INDAT: CLR “1 
co1b24 CLR COUN 














FOe 











MACYLL 276732) 


OVQOOoOVVIONIVIN000 
TUT — bb 0 8 = 


Oo 
MLW} OWONMUIL WU-OwWD 


=> -* b= b= b= 0b = 0-2 ps bb — § ~2 he pe 
fur 





25-FES-""S 


175634 


ab8e8 


SEES 


175616 
000015 


000177 
000069 
009067 


001624 
000067 


00909 


000978 


003772 
002022 
000030 
17777 

000226 


003226 
001406 


004034 
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GOe 











RODAT: TSTB  aTKS :TEST TTY READ STATUS 
BPL RDDAT «Wd 
Hove ITKB,-( SP) “PUSH DIGIT ON STACK 
BIC pit? ‘yi P) 
EcpaT: TSTp a rs ;"EST TTY PRINT STATUS 
BPL ECOAT : WAIT 
“OVE (SP) a TPB ‘ECHO CHARACTER 
CMPB sa 1S, (SP) 1S IT A TERMINATOR? 
BEQ RETRN :8R IF ¥ 
CMPB ss «& 177, (SP) 1S IT ; USOUT? 
BEQ RREAD :BR IF Y 
CMPBsaw60,, (SP) :IS IT AN OCTAL DIGIT? 
SGT RREAD :BR T 
CMPB saw? (SP) TEST AGAIN 
BLT — RREAD BR IF NO. 
INC COUNT "INC NO. OF DIGITS 
Mp #67, COUNT : HORE Tha SIX DIGITS? 
BLE ——- READ R_IF-Y 
ASL “1 :CLEAR LOWEST THREE BITS 
ASL “] :OF DATA WORD 
ASL %1 
Sup #50, (SP) :CONVERT TO BINARY 
ADD (SP3+.%1 : ADD DIGIT TO DATA WORD 
BR RDDAT GET NEXT 
RREAD: TYPE :TELL USER OABOUT ILLEGAL CHARACTER 
TST (SP )+ :GET RID OF ILLEGAL SHERACTER 
BR INDAT :START SUBROUTINE AGAIN 
SETRN: MOV %1, 10(SP) :STORE DATA WORD ON STACK 
TST (SP}+ ; INC STACK POINTER 
MOV (SP)+,%1 -RESTORE R1 
MOV (SP )+, 70 : RESTORE RO 
RTS pC :RETU 
;SUBROUTINE TO DELAY A SPECIFIED NUMBER OF MILLISECONDS 
ALY: MOV a i OLCN GET DELAY COUNT ADORESS. 
ADD “& :SET UP EXIT ADDRESS 
MOV Me, :DELAY COUNT TO STACK 
BEG DLYC 
~ @E PSw :SET PRIORITY 0 
DLYA: MOV #226, -(6) :1 MSEC COUNT TO STACK 
DLYB: DEC a%6 “SECREMENT 1 MSEC COUNT 
BNE DLYB :BRANCH IF NOT O. 
POPSP ZERO. UNCOVER MSECS. COUNT. 
DEC ab :DECREMENT 
BNE DLYA :BR IF NOT ONE DELAYING 
DLYC: POPSP : DONE 
DLCNT: OPEN :CONTAINS MILLISECONDS COUNT ADDRESS. 
: SUBROUTINE 


STA 





jDE TERMINED BY ey HE OF LOC ST 
JSR NGEN 


TO STALL A RANDOM ee, OF MILLISECONDS. MAXIMUM STALL 


; G0 GET RANDOM NUMBER. 
STL “0 # IN RO. APPLY STALL MASK. 
STA BRANCH IF RESULT IS O. 

40, sie 





-MAIN, MACYI1 
DIOLAF.P11 


1036 90491e 


1041 004920 
id4e 904024 
1043 004 nee 


Oa4i5€ 


271732) 
1904018 
000090 
000002 


004737 


300990 


013737 
3 


042737 


2S5-FES-7S 


003225 
oc4C40 


004042 


001410 
901414 
004110 
904119 
900012 


000082 


010009 
001612 


003516 
003309 


003554 


004112 
004112 


174052 
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STALA: 
STALB: 


i SUBROUTINE TO GENERATE RANDOM CHARACTER COUNT 
GRCNT: JSR 7,RNG ;GET 


‘ oie 


{SUBROUTINE TO SKIP _ON FLAG AND TIME OUT IF SKIP FAILS 
MOV RXCSR, SIOT 


THR 
TMTX 
T 


puts TO SELECT LINE 


R 5 
: JSR %7 , OVRLAY 


HOe2 















DELAY ; DELAY 
OPEN ; DELAY Sed 
RTI ;DONE. EXIT. 


RANDOM NUMSER 


RCMS Sk, “0 :Q 
BEQ GRCNT’ : TRY AGAIN IF RESULT 0 
MOV %0, RNCNT ; COUNT TO RNCNT 
RTS “? - 
OPEN RANDOM CHARACTER MASK. 
OPEN *RANDOM CHARACTER COUNT. 


;SET UP RXCSR ADDRESS 


BR TIM 

MOV TXCSR, SIOT ;SET UP TXCSR ADDRESS 
CLR TIMER 

INC TIMER 

BEQ TIMEX ;BRANCH IF COUNTER OVERFLOW 
TST8 aSIOT 

BPL TIMEe 

ADD #2, a%6 ;SET UP EXIT RETURN 
RTI 

0 

0 


ae JSRPTR 
BNE LINSLX ;BRANCH IF SET 
CLR FOUNDV 


JSR “7, CLROO 





| MAIN. ACYL! 
 O2DLAF.P1L 


i075 004164 
iOrS  CO41re 


001634 MOV 
ASL 


-_ 


102 


TEMP ,LINEN® 
TEMP 


—_—--—-— OO ee ee eee ny 


‘ ‘ ! 
;SAVE FOR TYPING 
ity 


7 en 





JOe 












-MAIN. MACY11 271732) @S-FEB-7& 10:49 PAGE 22 
DZDLAF.P11 ; 


< 


1077 004176 013701 001616 MOV TEMP, %1 

1078 OO4202 016101 001200 MOV RXCRO(1), %1 GET RXCSR DEVICE ADDRESS 
1979 42 g3e/01 000001 BIT #BIT0,%1 IS DEVICE THERE 
1080 00421 14 BEQ LINB : YES 

1081 004214 104000 LINA: TYPE NO, REPORT 

1082 004216 017217 MNOLIN 

1983 904220 o00744 3R LINSLX 

1084 OO42e2 004737 006072 LINB: JSR %7 , FORMAD 

1085S O04226 005037 177776 CLR PSW 

1086 OO4e32 952737 000001 001472 BIS . s#BITO,FMAP :SET MAPPING FLAG 
1087 9042840 O4e777 000100 175146 BIC - #BIT&;aTXCSR 

1088 O04246 952777 000100 175140 BIS #8176; aTXCSR 

1089 904254 O00240 NOP 


1090 
1091 004260 te Lh 001420 TST RXVTR 





1992 001 LINA 
1093 O04266 O42777 000109 175120 BIC #8176, ITXCSR 
1094 O04274 012737 000340 177776 MOV #PRTY?, PSW 
1095S O04302 O04S37 904474 JSR 5, OACNY ; TYPE LINE & 
te 004 001614 LINENO 
3 e 
10939 004314 104000 TYPE 
1100 O94316 (016714 ALINE 
hh 004320 os 
1103 “SUBROUTINE TO INITIALIZE BINARY COUNT PATTERNS 
1104 004322 012737 177777 004344 INBIN: MOV #-1, RIND ;SET ALL VARIABLES 
1195 04330 O04S37 004562 JSR x5, BMOVE ;TO MINUS 1. 
1106 004334 O04344 RINO 
1107 004336 O04345 RIND+! 
1108 004340 000013 11. 
1109 OO04342 000207 RTS “7 sEXIT 
1110 004344 000000 RIND OPEN 
1111 004346 000000 TO PEN 
lile 350 000000 T OPEN 
£113 Q043Se 000000 PIND OPEN 
1114 354 000000 PTOP OPEN 
Tie 000000 PTIP OPEN 
1117 APE ETAL BINARY COUNT PATTERN SUBROUTINE. EXITS WITH BIN CHAR IN RO 
1118 004360 013737 004346 004350 GTBIN: MOV PTO,PT1 ;PREVIOUS SIN CHAR TO PT1 
1119 QO04366 005137 004350 COM T 
1120 QO437e2 005137 OO4344 COM RIND 
lle1 904376 001002 BNE .+6 
lige OO4400 005237 004350 INC PTl 
1123 OO04404 042737 177400 004350 BIC #177490, PT ;MASK TO 8 BITS 
1124 OO4412 013732 OO4350 O04346 MOV PT1,PTO ;SAVE BIN CHAR IN PTO 
1125 004420 013700 004350 MOV PT1,%0 ;BIN CHAR TO RO. 
1126 O84424 000207 RTS 47 ;EXIT. 
lle? OO4426 013737 004354 OO043S6. GTBINP: MOV PTOP,PTIP ;PREVIOUS BIN CHAR TO PTIP 
11e8 OCO4434 005137 004356 COM PTIP 
1129 QOO444O 005137 004352 COM PINQ 
1130 OO4444 001002 BNE +6 
1i31 OO4446 005237 O04356 INC PTIP 
1i32 O044S2 042737 177400 O04356 BIC #177400, PTIP ;MASK TO 8 BITS. 


Ounce WOONOUIL We “IO 


OWN LW OWONWU1-£ Wr OwWD 


@Mowoowoodnd 
DOnNMUILCU 


271732) 


ReCRoCSSS 
c- ——— CD 
MmMUWOmwrnw & 
SIN NITUUNUIUIO 


03 


000000 


104013 


005037 
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004356 904354 
004356 


004560 


OO4S60 
177770 
oo0060 


000007 
0 


004560 


004762 
004672 


004742 
004674 


004670 
oc4S&2 


004744 








KO0e 







MOV PTIP,PTOP :SAVE BIN CHAR IN PTOP. 
MOV PTIP “1 ‘BIN CHAR TO R1. 
RTS “7 EXIT. 
“OCTAL TO ASCII CONVERT ROUTINE 
BACNVY: SAVREG 
MOV 3(5)+,OACNVX ;GET OCTAL VALUE. 
MOV (5)+, 41 :GET DESTINATION ADDR. 
MOV (5)+'%2 ‘GET CONVERT COUNT. 
ADD 42% ‘DEVELOP ADDR TO STORE 1ST CHAR. 
OACNVA: MOV OACNYX, %3 
BIC #177770, %3 ; ISOLATE LEAST SIGNIFICANT DIGIT. 
ADD #60, %3 -CONVERT DIGIT TO ASCII. 
MOVB %3,-(1) :STORE ASCII CHARACTER. 
BIC #7; OACNVX 
ROR OACNVX 
ROR OACNVX 
ROR OACNVX 
DEC %2 :DONE ALL DIGITS? 
BNE OACNVA :BRANCH IF NOT DONE. 
RSTREG 
TS ’ ;DONE. EXIT. 


OACNVX: OPEN | 
;SUBROUTINE TO MOVE A VARIABLE NUMBER OF BYTES. 
NOVE:  SAVREG ;SAV 





BMOVE : > 
(5)+,%1 :GET"FROM" ADDRESS 
MOV (5)+)%2 GET" TO" ADDRESS 
MOV (5)4+°%3 GET COUNT 
BMOVA: MOVB (1)+)(2)+ :MOVE BYTE 
DEC %3 :DECREMENT COUNT 
BNE BMOVA :BRANCH IF NOT DONE. 
RSTREG RESTORE REGS. 
S 4S ‘DONE EXIT 
“BINARY TO DECIMAL ASCII CONVERT SUBROUTINE. 
BDCNV: SAVREG | 
MOV #DECVAL, “0 ;SET UP ADDR TO STORE DECIMAL ASCII IN RO 
MOV )+, 44 ‘BINARY VALUE TC RI. 
MOV (5)+, BDCNVC :GET DEST ADOR 
MOV (5)+! BOCNVD GET CHAR COUNT 
MOV #ADTENP., %2 ‘ADDR OF TEN POWER STRING TO Re. 
MOV #5. CNVCTR :SET UP FOR S POWER CONVERSIONS. 
BDCNVA: MOV (23+, TENPWR “MOVE POWER OF TEN VALUE TO TENPWR. 
JSR 47 , SUBTEN “PERFORM CONVERSION 
DEC CNYCTR :DONE S CONVERSIONS? 
BNE BOCNVA :BRANCH IF NOT YET S. 
SUB BOCNVD, x0 
MOV %0, BDCNVB 
JSR 45; BMOVE 
BOCNVB: 0 
BDCNVC: 0 
BDCNVD: 0. 
RSTREG 
TS 





;YES, EXIT. 


4S I 
SUBTEN: CLR DIGIT CLEAR DIGIT 














06 
1244 004S37 004474 
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DZDLAF.P11 
1189 004706 163701 OO04746 SUBTNA: SUB 
1190 OO4712 103403 BCs 
1191 004714 005237 004744 INC 
1192 004720 000772 BR 
1193 004722 063701 004746 SUBTNB: ADD 
1194 004726 062737 900060 004744 ADD 
1195 004734 113720 004744 MOVB 
1196 004740 000207 RTS 
1197 OO04742 O00000 CNVCTR: OPEN 
1198 004744 900000 DIGIT: OPEN 
1199 004746 000000 TENPWR: OPEN 
1200 004750 923420 ADTENP: 10000 
1201 o004752 001750 1000. 
1202 . 604754 9001444 100. 
1204 004760 O00001 1 
1205 O0476e2 040 040 O40 DECVAL: .BYTE 
206 004765 040 040 040 
1207 004770 042777 O00002 174412 DATTST: BIC 
1008 004776 052777 OO0004 174410 BIS 
1209 005004 012737 900144 001564 MOV 
1210 O0SO01e 105777 174376 DATAA: TSTB 
1211 005016 100375 BPL 
lel2 005020 004727 o044e6 ISR 
1213 005024 110137 OO1S60 MOVB 
1214 905030 004737 605374 ISR 
121S 005034 110177 174356 MOVB 
1216 oOSO40 105777 174344 TSTB 
1217 005044 100375 BPL 
1218 OOSO4G 117737 174340 O01SS6 MOVB 
1219 005054 10400 DATCHK 
i220 005056 605337 Oo1Ss4 DEC 
1221 O05062 00135 BNE 
lep2 O00S5064 005726 TST 
lees 005066 104012 SCOPE 
1225 005070 104000 SETSR: TYPE 
le26 005072 016126 ASETSR 
227 005074 O00000 HALT 
1228 005076 000207 RTS 
1229 005100 104000 INCRTN: TYPE 
1230 005102 016225 AINCRT 
1231 005104 900000 HALT 
1232 005106 000207 RTS 
1233 005110 104000 INCRPG: TYPE 

HALT 
1236 005116 000137 oo2044 JMP 
1237 005122 005037 OOlé12 PRGEND: CLR 
1238 005126 032777 O20000 173040 BIT 
1239 005134 001026 BNE 
1240 005136 004537 o04604 JSR 
1241 005142 001636 PASCNT 
0000 


TENPWR, %1 
SUBSTNB 
OISIT 
SUBTNA 
TENPWR, %1 
#60, DIGIT 
DIGIT, (0)+ 
“2 


040,040,040, 040, 


#B1T1,ARXCSR 
#BIT2, dTXCSR 
100. > CTRO 
XCSR 
? GTBINP 
%1, CRBUFA 
7. MASKIT 
%1, JTXBUF 

JRXCSR 


4 
ARXBUF , CRBUF 


“7 


START 


FOUNDV 
#BIT13, dSRPTR 
PRGEXT 


%5, BOCNV 


%5, OACNY 





LO2 


;DONE FLAG 
GET RECEIVED CHARACTER 
;CHK DATA 


; INHIBI 
:8R IF 






;SUSTRACT TEN POWER FROM BINARY VALUE. 
;BRANCH IF UNSUCCESSFUL SUBTRACTION. 


;RESTORE SUBTRACTED VALUE. 
;CONVERT (DIGIT) TO ASCII 
ay ASCII CHAR TO DECVAL FIELD. 






040,040 


;CLEAR DATA TERM. READY 
;SET MAINTENANCE BIT 
;GET _— COUNT 


EADY FLAG 
;GET CHARACTER 








MOVE CHARACTER 

;MASK OFF NON TRANSMITTED BITS 
; TRANSMIT CHARACTER 

;WAIT FOR 










:DECREMENT CHARACTER COUNT 
:POP STACK 





; TYPE SELECT OPTION MESSAGE. 
rieayt HALT. 

; TYPE INCORRECT ROUTINE SELECTED. 
3 ONTO HALT. 









PRINT SET? 
T 









;CONVERT LINE NUMBER 





-MAIN. MACY11 27(732) 25-FEB-7& 10:49 PAGE eS 
DZDLAF.P11 


005154 001614 L {NENO 
ACLIN 


4 

004474 S %5, OACNV ;CONVERT RXCSR 
$ 

004474 SR_ = ~ %5,OACNV ;CONVERT VECTOR 


; TYPE PROGRAM END. 
010000 172754 PRGEXT: BIT #BIT12,dSRPTR ;LOCK ON LINE 
B PRGXT1 BR IF NOT SET 
061636 PASCNT 
BR PRGXTL 
001614 001616 PRGXT1: . were ;GET LINENO 
001616 preec: ¥ Pa ;UPDATE LINE NUMBER 
RXCROCL), “1 ;GET_RXCSR DEVICE ADDRESS 
177777 #177777, 41 sL ONE 
PRGEB :NO, CONTINUE 
001636 PASCNT 
LINENO 
CL TEMP 
oooo4e2 PRGXTL: ae42,%S 
8 CONT 


R 
LOGIC: ‘ R 7,(5) 


010000 172644 CONT: #BIT12,aSRPTR ;LOCK ON LINE 
8 PRGEA :BRANCH IF NOT SET 


R 
000001 PRGEB: 8 % sPEVICE THERE 


001616 TEMP 
001616 O01614 TEMP, LINENO 
006072 %7 , FORMAD 

005360 000207 “7 EXIT. 


‘CONDITIONAL ERROR HALT ROUTINE. 


005362 005777 172606 EHLT: TST aSRPTR ;CHECK FOR HALT ON ERROR. 
BPL EHLTA 1 yn IF NO HALT DESIRED. 


HALT 
005372 oo0000e2 EHLTA: RTI IN DATA LIGHTS. 
;MASKIT - MASK DATA ACCORDING TO LINE NUMBER 
005374 013737 001402 O0!404 MASKIT: MOV GET MA 
| 0 001404 BIC #177000, RMASK  :REMOVE C/D FLAG+PRIORITY 


001404 001560 | B 3 RTRSK, , CRBUFA ;MASK DESIRED BITS 








- MAIN. 











fe 





—-OVNOONIWUIL-L WMO 


w 
at) 





1322 








bb 0 bs 0 bo pe bs pe po fe pe po po po bo pe 











MACY11 2? 
ZOLAF.P11 


o0S424 


005674 


(732) 


017737 


000002 


012737 


063716 


25-FEB-75 10:49 PAGE 26 


001556 
004474 


004474 


CO4474 


177777 
000240 
005704 
O0S656 
000116 
177777 
000092 
920000 


005702 


004474 


004474 


004474 


005704 


001562 
001562 


001560 


005666 
005670 


COS&66 


172400 


005702 
CO1460 
091460 


BTCHK 


DTCHKX: 


DTCHKA: 
"ERROR HANDLER 
: MOV 


ERR 


ERRB: 
ERRC: 


& 
ERROR1 
ERDAT 
RTI 


ERRE ,@%6 





joaTa — ROUTINE, TEST ERROR BITS 
dRX CRBUFB 


RXBUF 


#170000, CRBUFB 
DTCHKX 

CRBUF , CRBUFA 
oT 


HKA 
%S , ORCNV 


“4S, OACNV 


“5, OACNV 


#-1, ERRB 
#40, ERRB+2 


3%6 ,ERRB 
JERRB, ERRB 


a-1,E ERRB+2 


RRE 
watTi 3. QSRPTR 
ERRC 


a6 Aa 


RRD 
fon TNNO 
#1115 TNNO 
%5, 0A acAY 


%5, OACNV 


%S , OACNYV 





;DID ANY ERROR BITS SET 


YES, TYPE ERR 
: COMPARE EYPECTED AND RECEIVED 


BRAN 
$60 TO OCT Pt TO ASCII CONVERT. 


; 0 CONVERT. 
;G0 Rg TO ASCII CONVERT. 


:S 
: DESTINATION ADDR. 
:#0F DIGITS TO CONVERT. 


;SET UP ONE MESSAGE CALL. 


;DEVELOP_ADDT*L MESSAGE ADDR. 
;STORE AT ERRB. 


fi Ae ‘ew PRINT? 
BRANCH TO INHIBIT PRINT. 
SBEVELOP "Salt tN ADDR. 


;G0 TO ocTaL TO ASCII CONVERT. 
SOURCE ADDR. 

: DESTINATION ADDR. 

: HOF RIGi TS TQ CONVERT 

;G0 TO OCTAL TO ASCII CONVERT. 
: SOU cont 
sDESTINA TION wt 

We Bare TQ CONVERT. 

G0 TO OCTAL TO ASCII CONVERT. 
;SOURCE ADDR. 

; DESTIN TION ADDR. 

; 8OF ol ITS TO CONVERT. 


ERR OR HEADER, 
:ADDT’L ERROR’ MESSAGE IF ANY. 


A 
G 


;GO ERR HALT IF DESIRED. 












is 
Ure 


alata 
wc) 
é 


20 0 +00 bbb 
6 90IGIGS ) 


006004 
1289 Q06006 


I 
4] 


Se aR BES 
B8R8R8 8 


£2 42. O)d trite dpe ier 
uve G titted wf 
€ 
€ 
o 


PES UDeD ae 


2 nb 8 = 8 bbs a ho hohe 


iS 
5 


3432 05200 





g00S0e 


009000 
099090 


013737 
pieces 


Ge UMUe- fur 


- 
tore 
I~ 
Wu) 
NN 


Retsts 


QO 
. 
oO 
NIG e= Ne Nie Ne 
WOWOdOWOW 


Proce 
Mewo 
SSeS Nes 


oO 

w 
S33 
WG6IGl 
NNN 


25-FEB-76 


177 r er 


C0ed+4 


001632 


001634 
O0CCO4 
001472 


001632 
eae 


o- S88 8858 


ONOOONOAO 


OOle1E 
OO1GiE 


0Cite0 
O0i4e22 


ERRO: 
ERRE: 


ERTP: 


ERTPA: 


MAPVES 
jnpeves 


bopMeD: 
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Rit 
OPEN 
OPEN 


- -—" VECTOR | OR REPORT ERROR DEFENDING ON FMAP FLAG 


SopsF2 


ePaty? Ph Psy 

LOPS 

OLDPS 

prea OLDPS 
as 


Bb hares 


“5S, OQCNY 


a ’ T ¢C 


a6, FRONPC 
#4, TOPC 
MiP 


ERTPA 

OPC TXVTR 
T4ec 

ie “RXVT 


Bk ge ay it te mck 


“i 

“1, eXBUF > 
#2 

“1, "TXCSR 

te," as 
tHiENO, EMP 
8CMASO, TEMP 
aTEMP. TEMP] 
TEMP. " UMASK 
TEMP! 
#177437, TEMP) 
TEMP] ,RXLVL 


;SAVE OLD STATUS 


;GET FROM PC 


NOT MAPPING 
sSTORE VECTO! 


;GET PRIORITY 


REPORT ERROR 


SERRO OR yo Soom 7 my TQ AND_FROM WHERE ERROR TRGP OCCURRED 


? 


a ae re ee 0 re oe eee see CoE EEE — 


IN. MACYLL 27.732 
aca. Pll 


906206 
006214 


poeeie 


BDESSS 


PPP aon 


OoS4+40 
S0e442 


PAGE 28 


IN 
TSTVEX: RTS 4? 


{RESTART ROUTINE 
RESTART:MOV = PRGNUM, 0 





CO3 


MOY TEMP}, TXLVL 
RTS “7. 





- SELECTABLE TEST DECISION MAKER 


: BIT 85179, aSRPTR ;1S SELECT TE 
SNE GOBACK ;RET = 70 Tee 
JMP GTRDYX ' 360 TC NEXT T 


cK: RTS 47 
MOV SPWRUP , 24 





4 
pee #PFRIL,24 





MOV - #SPROT, xe 


RESTART 


DEC IF VECTOR TO SE MAPPED AND MAP 
ISTVEC: FOUNDY ;NEED VECTOR MAPPING 


CMP #0 \ :! 
BNE tetyex 3NO, EXIT 

ISR “2 OVRLAY a. 

R | BXVTR 

81S 83ITO,FMAP :SET MAPPING FLAG 
BIC #8ITS,aTxXCSR =; CAUSE INTERRUPT 
gts SBI TE aTNeER 

NOP 





TST RXVTR ;0i0 — 
BNE TSTYA sYES, 9 
BIT eet Tia. aSRPTR 
BNE TSTVEC 
TYPE 3NO, ERROR 
INTER 
ERROR 
JMP TSTVEC 
BIC #BITS, aTXCSR 
CY @PRTY?,PSW ;RAISE PRIORITY, | 
C FOUNDY! 





ASL Cx 
IMP = ARSTART(O) ;G0 RESTART SELECTED PROGRAM 
: PRGOA ;PROGRAM Q RESTART ADDRESS 
PRG1A :PROGRAM 1 ; 
PRGA ; PROGRAM 
PRG3A 
PRGYA 
INCRPG 
INCRPG 





muna 


Ess 
:PROGRAM 4 RESTART ADDRESS 





Sin. 


DIDLAF.P LI 


TUTUPUTUMU-* b+ & + +0 0 b- --  - QO RR Fiat 
a» 


0 = 0+ 0-4 b= 2 2 bs b= 2 2 ho bo bo 2b be bo ho 
UATCAT es CAegealealealealealealealealealea eal ealeaTea eal ear eal eal eal eg! 
400M OWONMULE GU OwtONMmMmN 


COS444 


OOS446 
QOE4S4 
006460 


CoOESO4 
Co6S0+ 
056504 
906596 
00510 
COES1E 


preeas 


MACY] 27.732) 








098119 


cobeDe 


po2402 


COES20 
l7ebhe 


006570 
Oo201& 


172624 


2S-FEB-"s 
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INCRPG 


=PRGO - INPUT-OUTPUT LOGIC TESTS 


oo:4S2 §RGo: MoV BATO, KSTART 
se Bike ea 
"VE 
TYPE YES arte ane INSTRUCTIONS 
POTIT 
HALT 
Se 


J ? 
prcos: JSR 5 
PRGA: IMP ety 


TSTAA 


Pao 


DO3 





;GC_GET LINE #- FROM USER 
:GET STARTED. 


A, CD 
\X#14CD, \X42, \X41 


saeeveensentansonbnesndisnscsassanesbasansesanenensesenssezessesesssecssseseses 


TQ: 


800 


; TEST NUMBER + 
:ADORESS OF NEXT TEST + 
! ITERATION CCUNT + 
; SCOPE ENTRY POINT * 

+ 
+ 


jsnnenannesssaesenanasntzanssseheaeeascansaseasnssazesssensssssssseatessseseses 


PERE SEERA ESARRARESEAAEALADER EAD REAS EA REAAEAEEAREE READER EEEE AER EEtEERaeEaEEeE 
TEST sa TO REFERENCE RECEIVER BUFFER WITHCUT TRAPPING 


jtetesnanaeesssansiaaaschenstectiseeslstasaasenesenaasseaseasasaananesceazeaaanes 
Cc 


920004 MOV 8A 
CLR sexe 
AaB: SCOPE 
Bac: POPSF2 
ERROR 
Q aaeg 
TSTA 1000 
TSTAR AB. aa 
arty. 1900 
Ars 
1000. 
ABA 
X2X+] 
ocooo4 Apa: #ABE. MACHER 
' TS DBXORFLG 
BMI age 
TST JRXBUF 
aps: SCOPE 
ABE:  POPSPe 
ERROR 


TSTA 
TSTAA Age OP abo.” 
ptenenettsessevbebbnestianssesebesesbenessasaunteiinsenenecteanencsensaninionnes 


HT2: 1090002 
4 


iJEST ABILITY TO Re ere RECEIVER CSR A ey T TRAPPIN 


;SET UP MACHINE ERROR tap. 
;REFERENCE_RXCSR 
:0K IF NO TRAP. SCOPE 


; TRAPPED WHEN REFERENCING RXCSR. 


Sye1eed. \X+2, \X41 


; TEST NUMBER 

‘ADDRESS OF NEXT TEST 
ITERATION COUNT 
;SCOPE ENTRY POINT 


Se ae ae a 


;SET UP MACHINE ERROR TRAP. 


;REFERENCE RXBUF 
;0K IF NO TRAP SCOPE 


; TRAPPED WHEN REFERENCING RXSUF 


e140, \X#2, \X4] 


; TEST NUMBER * 
AOBRESS OF Nex ny TEST 


. 
-TTERA - 
SCOPE ENTRY BO INT . 












a nT 


w-Ioul 


WITT UNO TUT UT On Unt 
et TY 


DH SBOE 
ro 


-+ +00 = «bh 0 & = + bo 0 0-0 b= Op Bo pp pee 


ul 
yo 
Les) 


noses 
008662 
oo6e64 
OSS& 
O06670 


006572 


1572 O0€762 
1520 206762 


000002 


Te 


100003 
Q0666e 
001750 


DEE4C 
CCOOS3 


=. 
000774 


spooo; 












&S-FEB-""S 


003601 


00085! 
000091 


0c00Ci 


alalalay 
oocoo4 


172514 


10:49 PAGE 30 


REA: = BIT SBITO,aTXCSR ;SEE IF BIT IS CLEAR 
BEQ AEB L 
ERROR ?RESET DID NOT CLEAR IT 
: BR AED 
AEB: BIS WBITO,aTXCSR :SET TXCSR BIT O 
' SIT s8ITO.aTXCSR  :DID IT ser 
NE AEC : YES 
ERROR : Tea aria FAILED TO SET 
REC: BIC BITO,aTXCSR ;CLEAR TXCSR BIT O 
BIT SBITO.aTXCSR  :DID IT CLEAR 
BEQ AED 
ERROR :TXCSR BIT 2 DID NOT CLEAR 
QED: = BIS 8BITO,aTXCSR 
SRESET sISSUE RESET TO CLEAR 
SCOPE 
TSTA  10.,AG,CD 
TSTAA AG, 10. ; \X#14CD, \X#2, \X41 


E03 






X=X¢1 ‘ 
5 PERERSEREERAREREREROEERERASERD ESE ESEEE OH EEEAEEEREEEDEEEEEAORESEEEOES40459440089 
:TEST ABILITY TO REFERENCE TRANSMITTER CSP MITHOUT TRAPPING. 

RCA: = MOV BACE , MACHER ;SET UP MACHINE ERROR TRAP. ef 

* TST = TXCSR Rerenence TXCSR 


; TRAPPED WHEN REFERENCING TXCSS 


ACB 
TSTA 1090. AD,cD 
TSTAR AD. 1000. ’ \X#14CD, \x#2, \X#1 
=» RREREEEEREREEEEADEEDSESEERESE EE EEEESESER EEE ER ER ES EE REEEEEEEEEE ES ES EEEEE REESE SEES 


Ar3: 100003 ; TEST NUMBER - 
ATY i ABBRESS OF NEXT TEST + 
1000. : ITERATION COUNT + 
ADR ; SCOPE ENTRY POINT ‘ 
AS & 
TTT TTT TET ET TTT T TTT TTT TTT TT TTT PTT er TTT rrrer yr err ery rrr er 


: TEST ABILITY TO REFERENCE TRANSMITTER BUFFER WITHOUT TRAPFING 


ADA: = MOV «SADE, MACHER = SET_UP_ MACHINE ERROR TRAP. 
TST aT XBUF REFERENCE TX SuF 

ADB: SCOPE. : SCOPE 

ADE:  POPSP2 ri . 
ERROR ; TRAPPED WHEN REFERENCING TXBUF 
a 


E.CD 
TSTAA AP se \X#14CD, \X#2, \X#1 
jtperesentsssneceatosidesasieisensintssarsssassnassnssssccceeeesssnessseceseness 


ity. 100004 : TEST NUMBER * 
ATS :ADORESS OF NEXT TEST ‘ 
19. - ITERATION COUNT * 
REA : SCOPE ENTRY POINT * 
b 4 + 
j:enaauenseanapeaesnsensnaenecsinsnseraeseasnzanensssentecnsssaesasnessaeessses 


;TEST_THAT_TXCSR BIT 9 | aes CAN BE SET AND CLEARED 
ZAND THAT RESET CLEARS IT 


jsateARAREARAREREHERORER ERROR EASE RERERAA RARER ARR ARRAERERERA RH ETARERER REE ARETE TS 
RTS: 190005 ; TEST NUMBER ‘ 


ea ee a ee a ee — - — -C— 

















MAIN ey 25-FES-7S 10:49 PAGE 31 
d2OLAF PLL 
1381 06764 2076s aig :AODRESS OF NEXT TEST ‘ 
- 7 . $ 
1285 58 ake ached Ags CBE NtRY POINT ‘ 
158 9co00s X=X+] ‘ 
128? TTT TT TTT TTT TTT TTT TTT TTT TTT Titty 
i586 a pee lest THAT TXCSR Ite CAN ee SET, CLEARED, | BND THAT RESET EARS IT. 
1597 re 777 rouiy Ag : C : C . 
i588 alia 1402 a4 aBa : aaa IF BIT i cl Bak 
83 997002 104903 ERROR "RESET DID NOT CLEAR TXCSR SIT2 
99 907094 90042: BR Q 
81 907006 OSe77? O00004 172400 AGB:  &BIS #BIT2,aTXCSR SET TXCSR BIT2. 
82 907014 332777 O00004 17237 BIT wB1lT2.aTXCSR  :SEE IF BIT 1 SET. 
$3 0997022 001002 NE acc ‘BRANCH IF BIT IS SET. 
94 907024 194003 ERROR “TXCSR BlT2 FAILED TC SET. 
85 O07 900410 d R aco 
96 07030 Oe777 000004 172356 acc: Bic wGIT2,aTXCSR  ; CLEAR TXCSR BIT2 
87 997036 O32777 oocony 172350 BIT eBIT2,aTXCSR  :SEE IF BIT IS CLEAR. 
98 907044 001401 BEQ aco 
9s og704% 104003 ERROR ;TXCSR BIT2 FAILED TO CLEAR. 
69 907050 052777 000904 172336 ASD: BIS eBlTZ,aTXCSR § :SET TXCSR BIT. 
01 oo70ss 104011 SRESET LISSUE RESET TO CLEAR SIT. 
55 oo7065 104012 SCOPE : SCOPE 
53 907062 TSTA 


cD 
TSTAR f- ate "AX#14CD, \X+2, \X+1 


ta ] 
£ 
39 
j~ 
oOo 
ao 
fu 


2 = 0-2 2 & 28-2 O22 0-2 b= Os B22 = = = O22 0-2 2 bo bs fo BO = oh ph a hm Bo b= Pe 
he dh tt it ih i ah ih bs Ab tbe ee gear te tr ta rd rly 


os jteteenasessnensedentbunssuetinenslisetesssesseesesstenosessasenenessennanaennes 
O& 907062 100006 ATé: 190006 : TEST NUMBER ~ 
C? 907084 997179 AT? : ADDRESS OF NEXT TEST * 
68 CO706— 990012 4 19. ‘ITERATION COU * 
03 997070 907972 AJA :SCOPE ENTRY BOINT ‘ 
19 oocdos X=X+1 * 
ll jsunantanaecennensersentcazsrashannenssnessestessrsssnsaecsresretesesesaestssess 
le -TEST THAT TXCSR Bits. CAN BE SET, CLEARED BND THAT RESET CLEARS IT 
13 o07072 012737 000340 177776 AJA: MOV PRTY7. PSW :SET PRIORITY 
14 067100 032777 000100 172306 BIT #B1TS. “STXCSR : BEE iF TXCSR Bits IS CLEAR. 
1S Of7106 O01402 BEQ AIB ;BRANCH IF BIT IS CLEAR. 
16 907119 104003 ERROR *RESET DID NOT CLEAR TXESR BITS 
17 O07112 90042: BR AID 
18 9971149 052777 090190 72272 AJB: BIS ° #BITS,aTXCSR ;SET TXCSR BITS. 
19 007122 032777 090190 172264 - BIT sBITS,aTXCSR :SEE IF SIT IS SET. 
ef 907130 901002 BNE AIC :BRANCH IF BIT IS SET. 
e: O07132 104003 ERROR :TXCSR BITS FAILED TO SET 
22 007134 900410 OR AID 
3 007136 942777 o00100 172250 Alc: BIC #8ITS,2TXCSR ;CLEAR TXCSR 8176 
24 097144 032777 600!00 172242 BIT e8IT&,aTXCSR :SEE IF BIT IS CLEAR. 
; lbeS 907152 OC1401 BEG AID 
1626 007154 104003 ERROR :TXCSR BITS FAILED TO CLEAR. 
1527 907156 052777 900100 172230 AJD: BIS #B1T&,ITXCSR SET TXCSR 
| 628 OO7164 104011 SRESET : 13SUE RESET 18° CLEAR SIT. 
| 6e3 697156 104012 SCOPE : SCOPE 
| 1636 097170 TSTA ~—_:100.. cD 
| 4631 007170 TSTAR AK, ito” \X#1 40D, \X#2, \X#1 
j 1632 90eunenssensensnehsscabonanuanbecathcasseencoesasoncanbeunnnseueseubeeusaensenes 
| 1633 007170 1090007 Ar?: 190007 ; TEST NUMBER * 
| 3634 997172 007214 ATi  ADORESS OF NEXT TEST x 
1635 987174 Goold 100. : ITERATION COUN + 
1636 807176 o07200 AKA :SCOPE ENTRY POINT * 





MAIN. MACY! 
DIOLAF. 


b07s22 


pores 


76 
007376 


oo7276 
067300 
807202 
907304 


007306 


907274 


104011 
1049ie 


peeoL0 


a) 
000010 


04277 


104012 


000002 
920902 
co00c2 


00CCCe 
Co0C0e 


000004 


o0cco4 
000004 


000004 
000004 


ooc004 


172036 
172030 


172916 
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X=X¢+1 


GO3 


* 
jsnpanaenanenneasnasenaeatcnashenenennesecieasnaeseniesscarsasserersscsssessese 


TEST THAT TXCSR_ BIT 7 (READY BIT) IS SET UPON ENTERING ROUTINE AND 
THAT IT_CAN BE BER RELTABLY. 
Ak KA: TSTB JTXCSR ;SEE IF TXCSR BIT 7 IS SET. 
AKB ;BRA NCH IF SET. 
ERROR :TXCSR BIT 7 NOT SET. 
SRESET ;ISSUE RESET TO CLEAR SIT IF ERROR 
AkS: axone : SCOPE 


T AL.O 

TSTAA a OF age: "\X#140, \X#2, \X+1 
jtieenensenenanasshesetecseteebeesabssesaseaseneensnenenennestesssnensentenebnnss 
TIO: 


10 ; TEST NUMBER 
ATI ‘ADDRESS OF NEXT TEST * 
100. ; ITERATION COUNT + 
oe , SCOPE ENTRY POINT - 
=X+ + 
AHHH EEE UU SG HHH HE HEHEHE CGH HUGE EG ree 


: TEST THAT RXCSR BIT 1 CAN Be SET + CLEARED 
ALA: B sBIT1,daRXCSR 


IC 
BIS #8IT1;/ IRXCSR -SET RXCSR it! F 
BIT #BIT1,aRXCSR -SEE IF BIT IS SET 
BNE ALY :BRANCH IF SET B 
ERROR ?RXCSR BIT 1 FAILED TO SET 
ALY BIC #8IT1.aR CLEAR RXCSR BIT 
BIT #8171 "aR XCep :SEE IF BIT IS tear 
LZ 
; ERROR ;RXCSR BIT 1 FAILED TC CLEAR 
AL2: SCOPE : SCOPE 
TSTA 
TSTAA AP’ ate exes, X42, \X#1 
+--+ “1 >" heheheheheeheeheeeheheiehieblaai 
Tllr Ql : TEST NUMBER x 
AT! ‘ ABBRESS OF NEXT TEST * 
10. - ITERATION COUNT * 
APR :SCOPE ENTRY PGINT * 
=X+ 2 
jseneesesessnansenseaenaeaenesesiesanseaetsassnensrasansnsacsteatestatsnstscsstas 


jTEst THAT RXCSR BIT2 IS CLEAR AND cAN BE READ R 
Apa 3 sBIT2 EE IF RXC 


B APD 
APB: BIS eBIT 
pS 


APCX: 


2, IRXCSR 
Te, JRXCSR 


APD 
#B1T2, IRXCSR 
BIT sB1Te, , JRXCSR 


#BIT2, IRXCSR 


. ; sc 
;RXCSR BIT2 IS NOT CLEOR. 
:QET RXCSR_BITe 

;SEE IF BIT IS SET 
:BRANCH IF SET 

:RXCSR BIT2 FAILED TO SET 


;CLEAR_RXCSR BIT2 
;SEE IF BIT IS CLEAR 


sRXCSR gite FAILED TO CLEAR 
: ISSUE RESET TO CLEAR BIT 











HO3 
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ZOLAF Pil 
1693 900737 TSTA 
1834 00737 TSTAA Ab: ate +Rx+190, \X+2, \X+1 
1635 5-day -<a1'*"+-eeeeeeeheiebeheehhiiiid 
1698 907376 900012 _ ATI2: 12 ; TEST NUMBER $ 
1897 907800 O07476 AT13 ADDRESS OF NEXT TEST P 
1698 O074Ce2 000012 10. : ITERATION COUNT 4 
1899 907404 007405 QQA : SCOPE ENTRY POINT * 
1700 000012 X=X¢] $ 
1701 jsnDestenanaeaesacoesansscsraeebannecsnsensaserenaesseataesatststtscassoesessess 
1702 -TEST THAT RXCSR BIT3 CAN BE SET, CLEARED, AND THAT RESET _on 4 
1703 OO740& O32e777 O00010 171774 Aga: BIT #BIT3,adRXCSR : SEE IF RXCSR BIT3 Ie CLEAR 
1704 OO7414 30140e BEQ AQB ;BRANCH IF BIT 
1705 OO74i6 104003 ERROR RESET DID NOT OceaR RXCSR BIT3 
1706 GO74e0 O004el BR AQD 
1797 097422 OSe777 000010 171760 AGB: BIS eet td. aJRXCSR ;SET RXCSR BITS. 
i708 007430 032777 000019 1717Se2 BIT s86IT3,adRXCSR : SEE IF BIT IS 
709 097436 001002 BNE AC : BRANCH IF BIT IS SET. 
1719 007440 104003 ERROR RXCSR BITS FAILED TO SET.. 
1711 oO7442 go0410 EF Ago 
W7i2 OO7444 O42777 OO0010 171736 Ad: BIC #BITS,dRXCSR ;CLEAR RXCSR BITS 
1713 OO74S2 032777 900010 171738 BIT “BIT 3, JRXCSR : SEE IF BIT IS CLEAR. 
171% OO746G 001401 BEQ AQD 
1715 OO746e 104002 ERROR ae 130 FAILED TO CLEAR. 
1218 097464 0S2777 O8O019 171718 Ad: BIS #BIT3,IRXCSR :SET R T3. 
W717 = =O074% 1o4911 SRESET : ISSUE XRecee TO CLEAR BIT. 
1718 907474 104012 SCOPE : SCOP E 
1719 00747 TSTA 
1720 697476 TSTAA AB “1BR P4140 \X+#2, \X+1 
1721 5 lapis -++-U' 1" phieieeeebeieiebiieboebioiiieiai” 
1722 007476 900013 Ari3 ; TEST NUMBER * 
1723 007500 907604 ae  ABDRESS OF pt TEST * 
1724 O07502e o000le 10. : ITERAT ION COU # 
1725 007504 907596 ARA : SCOPE ENTRY POINT ~ 
1726 009013 X=X+] * 
1727 janeeenesanaenensasisenscanearilcnenerseesseneasistsetaessnaesneresssssssestess 
1728 - TEST THAT RXCSR BITS oe BE SET, CLEARED, AND THAT we tat CLEARS IT. 
1725 pore 012737 000340 177776 ARA: MOV ePRTY7,PSW :PRTY TO’ INHIBIT Y INT 
1730 007514 9032777 QOO004O i71656 BIT SBITS. SRSCSR ;SEE te RXCSR BITS” ts CLEAR. 
1731 O07S22e 001402 BEQ ARE : BRANCH IF BIT IS CLEAR. 
1732 O00752e% 104002 ERROR : RESET DIC NOT CLEAR RXCSR BITS 
1733 007526 900421 BR ARC 
1734 007530 052777 900040 171652 ARB: BIS sBITS,aIRXCSR ;SET RXCSR Bits, 
1732S 007536 032777 o0004O 171644 BIT #BITS,aRXCSR : SEE IF BIT 
1736 OO7544 001002 BNE ARC : BRANCH IF BIT is SET. 
1737 907546 104003 ERROR ?RXCSR BITS FAILED TO SET. 
1738 007550 000410 BR 


ARD 
1739 007552 O4e777 090040 Stas: ARC: BIC #81TS,dRXCSR ;CLEAR RXCSR BITS 


1740 007560 0320777 COO04D 171622 BIT #BITS;ARXCSR SEE IF BIT IS CLEAR. 
1741 007566 O01401 BEQ ARD 

1742 0907570 104003 ERROR :RXCSR BITY FAILED TO CLEAR. 
1743 007572 052777 OO0O40 171610 ARD: BIS WBITS,ARXCSR § :SET RXCSR BITS. 

1744 007600 104011 SRESET tISSUE RESET TO CLEAR BIT. 
174 07602 104012 SCOPE : SCOPE 

1746 007604 TSTA CD 

1747 007604 TSTAA Ae she \X#14CD, \X#2, \X#1 


1748 jE nea R RARER AERA RA ARRAS REE ERR ERROR RE RRR ERR ES 
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1743 907504 ip9014 ATI4: 100014 ; TEST NUMBER . 
1750 007606 O0771 ATI5 ; ADDR ESS OF NEXT TEST * 
iad pore! poo tE 10. » ITERATION COUNT Pt 
M7 ‘bl 14 asa : SCOPE ENTRY POINT ~ 
1752 000014 X=X+] + 
1754 Seoinienastetie hasseianetiaeaiadnaidetaiiabenasammiiana tahnaiasiiceaueiaiadiaial 
1755 : TEST THAT RXCSR BITE CAN BE SET, CLEARED, AND THAT RESET CLEARS IT. 

1756 OO76i4 012737 000340 177776 ASA: MoV BPRTY7. PSW ;SET IORITY 

1757 007622 O3e777 O00100 171560 BIT #BIT6, “ aRXCSR >SEE IF RXCSR BIT6 IS CLEAR. 

1758 oO763C 901402 BEQ ASB : BRANCH IF BIT IS CL 

1759 00763e 194903 ERROR ‘RESET DID NOT CLEAR RXCSR BITS 

1760 007634 3900421 BR ASD 

1761 007836 OS2e777 cO0100 171544 ASB: 81S #8176, aRXCSR ;SET RXCSR BITE. 

i762 007644 Q327 000106 171536 BIT #BIT6, aRXCSR : SEE IF BIT 7 SET. 

1763 007652 001002 BNE ASC : BRANCH IF BIT IS SET. 

1784 007654 104003 ERROR :RXCSR BIT& FAILED TO SET. 

1765 007656 Q00410 Me BR ASD_ 

17&& 907660 O42777 000100 i71S2e Ase: 8ICc #BI7TS,dRXCSR ;CLEAR RXCSR BITE 

1787 007666 032777 900100 i71514% BIT #BIT&,dRXCSR : SEE IF BIT IS CLEAR. 

768 007674 OO01401 BEQ D 

1783 007676 104002 ERROR — BIT&6 FAILED TO CLEAR. 

1770 007706 OS2777 CO0100 171502 AsD: BIS #BIT&,aRXCSR SET R XCSR BIT6. 

1771 007706 104011 SRESET : ISSUE RESET TO CLEAR BIT. 

1772 OO7710 1049le SCOPE : SCOP E 

1773 «60007712 TSTA 100 

1774 907712 TSTAA AT ito’ e140 \X+2, \X+1 

1775 jsteenenneetenensnbenssbeneneeleceshetesevssneneessaeanesssseenensnnnnnennnnenees 
1776 GO7712e o900015 ATs: 1S ; TEST NUMBER * 
1777 907714 007740 AT16  ABBRESS OF x TEST x 
1778 007716 000144 100. : ITERATION COUN s 
17739 087720 9007722 a7 ‘ : SCOPE ENTRY BINT 4 
1780 ooo01s X=X+]1 * 
1781 ESHER HEHEHE HEHEHE HHH HHH 
1782 iTEST THAT RXCSR BIT7 IS CLEAR AND CAN BE READ RELIABLY. 

1783 007722 032777 oo0200 171460 ATA BIT | ae XCSR 7 SEE IF RXOSR BIT7 IS CLEAR. 

1784 097730 001402 BEQ AT ;BRANCH IF BIT IS CLEAR. 

1785 007732 104003 ERROR RXCSR BIT7 IS NOT CLEAR. 

1786 007734 10411 SRESET RESET IF ERROR 

1787 007736 1040le ATB: SCOPE : SCOP E 

1788 007740 TSTA 

1789 007740 TSTAA AN Or ao.” +140 \X#2, \X+1 

1736 lala faa “1> =" ahha 
1791 007740 op0016 Atle: 16 ; TEST NUMBER x 
1792 007742 007766 : AT17 i ADDRESS OF NEXT TEST * 
1793 907744 000144 100. :I TERATION COUNT x 
1794 007746 007750 AXA : SCOPE ENTRY BOINT + 
173¢ 000016 X=X+] * 
179 pH ED oreecrrreaienrecanehucececnennenaennaseetaenaeneaaaaaataasatetts 
1797 TEST THAT RXCSR BIT1O IS CLEAR AND CAN BE READ RELIABLY 

1798 007750 032777 oOGe000 171432 AXA BIT #BIT10,dRXCSR ;SEE IF RXCSR mie IS CLEAR. 

1799 007756 001402 BEQ AXB sBRANCH IF BIT 

1800 007760 104003 ERROR sRXCSR BIT1O IS Rote CLEAR. 

1801 QO07762 104011 , SRESET ;RESET BIT IF ERROR 

1602 007764 1040le AXB: SCOPE > SCOPE 

1803 007766 ~ TSTA 


CD 
1804 907766 TSTAA AY ate "\X#14CD, \X#2, \X41 





BOVE 


OO IT UF UFO 


ie 


w 


MW — — b— pe 


Mor L ££MO 


O—* 0—+ b= b= b= = bb bb bh 0 9 fe 2 pan po he bo he 
WwW 
Ses8 88ss 


Bepeiges 





74732) 


104912 


100929 


104012 


100021 


104012 


oo4ooo §=171404 


er es Re ne ae ee reese ee een 
00017 ; 


ATI7: 


AYA 


AYB: 


At20 
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100. 
AYA 
X=X+1 


ERROR 
SRESET 
SCOPE 
TSTA 
TSTAA 


100. 
AZA 
X=X+1 


iret UMBER 
RESS OF NEXT TEST 
ION COUNT 

ite ENTRY POINT 
UPA nencreneneeere rece cabnenenaeaeeeecenaete re teciesetacansetetenseets 
TEST THAT _RXCSR BIT11 IS CLEAR AND CAN pe ober ELIABLY 

BIT #81T11,dRXCSR ee Bn TP SF BIT 1S CLEAR. 
coe BIT11 “1g fof NOT CLEAR. 


cD 
ag OF age \X+14CD, \X#2, \X+1 
ged I 8 emmmnnnenn 


ST_NUMBE 
ADDRESS OF NEXT TEST 
ITERATION COUNT 
:SCOPE ENTRY POINT 






2 OK OK OC Oe 


% 


ee 


Tee ETT T TT TTT TTT TT TTT TTT TTT TT TTT TTT TTT TT TTT TTT TTT TT TTT TTeTe TTT TTT TtTe 


: TEST big eee BITi4, IS CLEAR AND CAN BE READ RELIA 
BEQ 


AZA: 


AZB: © 


AT21: 


AAAA 


ARAB: 


ERROR 

SRESET 
PE 

{et a 
TRA 


X=X+1 


SRESET 

SCOPE 

; ALL PREVIOUS He oy H HAVE BEEN RUN SUCCESSFULLY eeero 
N ALSO, THE JU 


NECT 
D NT Boo 1-— CABLE tN PLACE OF THE NSDERY 
t REFER TO OPERATION WITH SUMPER INSERTED. 


TSTA 
TSTAA 


H IT 
TRXCSR BIT14 IS Ror CLEAR. 
R IF ERRCR 


A,CD 
DAR “1607” \X+14CD, \X#2, \X#1 
ARES: 15 Mt eR Seu; a neemencaeE 
1 


TEST NUMBE 
; ADDRESS or ent TEST 
: SCOPE ENTRY POINT 
UP eioceeras besceceenreneca caenianataeanennecssaeesensentes 
jIEST a Baal BIT1S IS CLEAR AND om pe READ RELIABLY 

CSR BR SEE Ae Btr BIT1S 1S CLEAR. 
sRXCSR BITIS IS NOT CLEAR. 
RESET BIT IF ERROR 
: SCOPE 


B,0 
AFB “1600” \X+140, \X42, \X+1 


ee 2 2 


* 











+ elena" aaah 
T22: ¢@ 





AFBA 


100. 


; TEST NUMBER 
‘ADDRESS "y ay TEST 
: SCOPE ENTRY POINT 





OM ie ok 





KO3 
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X=X+1 * 

ee TTT TTT TT TTT TTT TT TTT TT TTT TT TTT TTT TT TC TE TTT 
: TEST THAT CARRIER DETECT SETS AND CLEARS WHEN DATA TERMINAL 
“READY SETS AND CLEARS. 

ocoog2 171302 AFBA: BIS #BIT1,dRXCSR ;SET DATA TERMINAL READY 

11762 J %7 tH E :D LAY 
10000 171270 wp1T 12, ARXCSR : TEST CARRIER DETECT 
AFB SHOUD BE SET 


AFBC 
oo00d02 171254 : agitt ARXCSR ;CLEAR DATA TERMINAL READY 


011762 ; 
010000 17124e abttie, ORXCSR =; TEST CARRIER DETECT 


;WAS SET, ERROR 
104012 AFBC: 


B.0 

TSTAA 1 O obe \X$ 140, \X#2, \X+1 
= sae” cman ge 3" aagpmmlgre eit eaes ates 
: 2 * 


090023 AT23 » TEST NUMBE 
- ADDRESS OF NEXT TEST 
ITERATION COUNT 
BGBA :SCOPE ENTRY POINT 


TT TTT TTT 
TEST THAT MODEM INTERRUPT (BIT 15) SETS a CARRIER DETECT 
‘CHANGES STATE, AND _IS CLEARED — RXCSR_IS_READ. 

g00002 171216 AGBA: (18 + @RXCSR CLEAR DATA TERMINAL READY 


tH E : 
001606 aRXCSRe RXCSRT  :READ RXCSR 
- 171176 #BIT1S,dRXCSR :TEST MODEM INTERRUPT 
AGBB WAS CLEAR BB 


} AR GO TO AG 
sMASHT EAR 


AGBE 0 SCOPE 
171162 : #81T1,aRXCSR SETTING DATA Mada dt 
CARES CARRIER DETECT TO SET. 
WHICH CAUSES MODEM INTERRUET TO SET 


“7, TIME LAY 
001606 JRXCSR, RXCSRT MOV — RXCSR TO_TEMPORARY LOCATION 
001606 #BITIS;RXCSRT  ;TEST MODEM INTERRUPT 

AGBC ; SHOU ee SET GO at AGBC 


AGBE ;GO0 TO SCOPE 
100000 171126 rs #81715, dRXCSR sMODEN INTERRUPT BIT SHOULD 
HAVE on 


O0D000 WBDOCOOOOOOO0000 
Ob eh bb a ee 
2000 DBDVOIOCOOVOVOVOOO0000 
TON Wu £ Wwrururmn-Oo 


6 
ele 
214 
216 


010 
910 
01017 
010. 
010 
0i0 
010 
010 


AGBD TT WAS 
AGBE :GO TO SCOPE 
042777 000002 171112 : ¥BIT1,9RXCSR  :CLEARING DATA TERMINAL READY 


CAUSES CARRIER DETECT TO CLEAR 
;BUT MODEM INTERRUPT WILL SET 
004737 011762 


171102 001606 aRKCER RXCSRT MOV RXCSR TO TEMPORARY LOCATION 
190000 001606 WBITIS,RXCSRT  ;TEST MODEM INTERRUPT 
AGBE ; SHOUL LD BE SET 
104003 ‘IT 
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AF.P11 
1917 010322 000400 
1918 010324 1040le 
1919 019326 
1920 010326 
1321 
1922 010326 900024 
1923 010330 010440 
1924 010332 000144 
1925 010334 010336 
1926 o000e4% 
1927 
1928 
1929 
1930 010336 042777 
1931 010344 004737 
1932 010350 932777 
1933 010356 001402 
1934 010360 104003 
1935 01036e O004eS 
1936 010364 052777 
1937 010372 004737 
1938 010376 032777 
1939 010404 0010 
1949 010406 104003 
1941 010410 OO004le 
1942 O104le 042777 
1943 010420 004737 
1944 0104 032777 
1945 0104 001401 
1946 010434 104003 
1947 Q10436 104012 
1948 010440 
1949 010440 
1950 


1951 10440 O00002S 
1952 O1044e 010534 
1953 Oi0444 900144 
1954 O10446 010450 


1955 0000eS 
1956 
1957 
1958 
1959 010450 042777 
1960 O104S6 004737 
1961 010462 052777 
1962 010470 004737 
1963 010474 032777 


1971 010532 104012 





LO3 
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000002 
011762 
020000 


oo000e 
011762 
020000 


ooooCe 
011762 
020009 


oo0004 


040000 


OCO004 
011762 
040000 


171044 
171032 


171016 
171004 


170770 
170756 


170732 
170720 
170706 


170674 
170662 


BR AGBE 

AGBE: SCOPE : SCOPE 
TSTA JB,0 
TSTAA B 100. '\x+1+0, \x+2, \X+1 

yeapennanteaneacean daeeihaeeneba rena nEBABOARaTSOAROESONEAE EES ME OA nEa EOE 

ATo4u: 24 : TEST NUMBER % 
ates ADDRESS OF NEXT TEST 4 
100. ‘ITERATION COUNT * 
BIBRA SCOPE ENTRY POINT , 


X= 
138g 
;TEST THAT CLEAR TO SEND (BIT13) SETS/CLEARS WHEN DATA TERMINAL 

READY SETS/CLEARS. 
Ayea: BIC te ARXCSR ;CLEAR DATA TERMINAL READY 


JSR LAY 
BIT aBtt13, JRXCSR TEST CLEAR TO SEND 
_ aso ;CLEAR TO SEND SHOULD BE CLEAR 
AJBB: ras je, pe aJRXCSR + _ TERMINAL READY 
BIT agit, JRXCSR TEST CLEAR TO SEND 
oe asap : CLEAR TO SEND SHOULD BE SET 
AIBC: aac he JRXCSR ;CLEAR DATA TERMINAL READY 
2a aBtt13, aJRXCSR : TEST CLEAR TO SEND 
ERROR ;CLEAR TO SEND SHOULD BE CLEAR 
AJBD: SCOPE : SCOPE 
TSTA B,O0 
TSTAA Ak ry “1007 \X+140, \X#2, \X+1 
eusutiiert animes tbieilocteicetian (i bane ouanammmeneuianintneeeaiticeieemaeli 
AT25: 25 s TEST NUMBER * 
AT26 ;ADDRESS OF NEXT TEST + 
100. : ITERATION N COUNT + 
AKBA ; SCOPE ENTRY POINT « 
X=X+] > 


DTT TTT TTT TTT TTT TTT TTT TTT TTT TTT TERETE 
TEST THAT RING (BIT 14 RXCSR) SETS WHEN REQUEST TO 

:SEND SETS AND CLEARS AND RESET CLEARS RING 

AKBA: BIC agTe ar CSR ;CLEAR REQUEST TO SEND 


JSR TIME ‘DELAY 

BIS aatte DRXCSR  ; SET REQUEST TO SEND 

BIT aBtTls, DRXCSR : TEST RING 

ERROR RING SHOULD BE SET 
aKec: BIC sB1T2 DRXCSR CLEAR REQUEST TO SEND 

JSR : DELAY 

BIT aatTls, DRXCSR ;TEST RING 

BEQ : SHOULD 32 CLEAR 

ERROR 

SCOPE ; SCOPE 


TSTA 100. ,AOB,O 













DZDLAF.P11 







1973 010534 
1974 

1975 019534 
1976 010536 
1977 O10540 
1978 O10542 
1979 

1980 

1981 

1982 10544 
1983 910552 
1984 010556 
1985 010564 
1986 010566 
1987 910570 
1988 010572 
1989 010600 
1990 910604 
1991 010612 
1992 010614 
1993 010616 
1994 O10626 
1995 010626 
1995 010632 
1997 019640 
1998 O10642 
1999 10644 
2000 O10646 
200i O10646 
2002 

2003 O10646 
2004 010650 
2005 010652 
2006 010654 
2907 






2012 O10664 
2013 010670 
2014 010676 
2015 o10700 
2016 O10702 
2017 010704 
2018 o10712 
2020 910724 
2021 010726 


iat) 
oOo 
_— 
ve] 
 Speperbed wet eh ad art erberterd wep aferhertertartard 
oO 
“NI 
_ 
o 
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000026 


104012 


000027 


000027 


042777 
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. 000004 


011762 
100000 


000004 
011762 
109000 


ooo004 
011762 
190009 


000010 
011762 
002000 


000010 
011762 
002000 


000010 
011762 
002000 


170636 
170624 


170610 
170576 


170562 
170550 


170524 
170512 


170476 
170464 


170450 
170436 


MO3 


TSTAA  AOB, 100. , \X+1+0, \X+2, \X+1 
billet" liebe 


AT26: : TEST NUMBER 
i ADDRESS OF NEXT TEST 
05. ; LTERAT ION COUNT 
0 ER :SCOPE ENTRY POINT 
guneunetnne tadunqennqvannesnenatonoevenqnsnensnnenedecensnsusconnnnnenmonmenes és 


{TEST THAT MODEM INTERRUPT (BIT 1S RXCSR) SETS WHEN RING SETS. 
AOBA: Fic + JRXCSR be REQUEST TO SEND 


2 KOK OK ec 


SR TIME 
BIT WOtT1S ARXCSR TEST MODEM INTERRUPT BIT 
EQ AOBB 
ERROR 
R AOBD 
Q0BB: BIS ubITe JRXCSR —-_ ; SET REQUEST TO SEND 
BIT aBitls, DRXCSR TEST MODEM INTERRUPT BIT 
ERROR 
BR AOBD 
AOBC: BIC aBITe JRXCSR s CLEAR REQUEST TO SEND 
BIT aBitis, JRXCSR TEST YMODEN INTERRUPT BIT 
ERROR 
AOBD: SCOPE :SCOPE . 
TSTA B,0 
TSTAA APB abi \X#140, \X42; \X#1 
TT TT TT TTT ET ET EST S STS ST TESTS STE TTT ETEE TTT TT TT TTT TCTE TEESE CEST ECTS ESET ESTE TS 
At27: 27 ; TEST NUMBER ¥ 
“ADDRESS OF NEXT TEST % 
100. : ITERATION COUNT % 
ALBA :SCOPE ENTRY POINT * 
1330008 
:TEST THAT SUPERVISORY RECEIVE DATA (BIT 10 RXCSR) SETS/CLEARS 
; WHEN SUPERVISORY XMIT DATA SETS/CLEARS. 
ALBA: BIC #BIT3,ARXCSR CLEAR SUPERVISOR XMIT DATA ~ 





ary abt t10, aRxcse 'TEST SUPERVISORY RECEIVE DATA. 
ERROR ;SHOULD HAVE BEEN CLEAR - 
ALBB: ais aBiT3 QRXCSR ;SET_SUPERVISORY XMIT DATA 
Bit apttio, aRXCSR } TEST SUPERVISORY RECEIVE DATA 
ERROR ;SHOULD HAVE BEEN SET 
ALEC: gic | aBtT3 QRXCSR CLEAR SUPERVISORY XNIT DATA 
Bit apttio, ORXCSR TEST SUPERVISORY RECEIVE DATA 
aLeo: SCOPE 1 ghee aerchemgae 
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000030 
011120 
000144 
010770 
000030 


104012 
100031 


090031 


012737 
0 


004537 
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TSTA py AMB,O 
TSTAA 00. "\X+140 \X+#2, \X41 
Tae eboiceniebnaainiar< + "=~ aumnapemepeumoimmenmaamneeer 


TEST NUMBER s 
AT31 ADDRESS OF NEXT TEST + 
100. ITERATION COUNT . $ 
tend ;SCOPE ENTRY POINT : 
1333000 dS 
{TEST THAT SUP REC DATA TRANSISTIONS zl post INTERRUPT 
000010 170412 AMBA: BIC > T3, JRXCSR ;CLEAR SUP REC 
011762 JSR TIME ; DELAY 
000010 170400 BIS agtt3 JRXCSR sae SUP REC 
011762 JSR LAY 
100000 170366 BIT agttis, JRXCSR TEST MODEM INTERRUPT 
AMB ;MODEM INTERRUPT SHOULD BE SET 





AMBE 
100000 170352 AMBB: 24 ares ;MODEM INTERRUPT SHOULD BE 


CLEARED BY PREVIOUS READ 





AMBE 
000010 170336 AMBC: BIC be, poe @RXCSR j i= O TRANS OF SUP REC DATA 
011762 gee 


100080 170324 T welts, JRXCSR {TEST MODEM —— 


SHOULD BE S 





AMBE 
000010 170310 AMBD: BIS ot dRXCSR ;0-1 TRANS OF SUP REC DATA 
011762 JSR :DELA 

100000 170276 BIT aaitis, JRXCSR ; TEST MODEM INTERRUPT 


:SHOULD BE SET 





ER 
AMBE: ScOPE 
TSTA 





10. ,ABA,CD 
TSTAA ABA, 10.) \X+1+CD, \X#2, \X+1 
i +1 latte 


AT31: 100031 : TEST NUMBER % 
AT32 i ABDRESS OF NEXT TEST % 
10. : ITERATION COUNT x 
ABAA SCOPE ENTRY POINT % 
X=X+1 » 


PETE EET TT TTT TT TTT TTT TT TT TT TTT TTT TTT TITRE TTT TTT TTT TTT TTT 


“TEST THAT RESET CLEARS ALL TXCSR BITS, AND SETS BIT 7 (READY) 
000340 177776 ABAA: ‘MOV #PRTY7, PSW ;SET PRIORITY 7. 
177777 170250 MOV #-1, ITXCSR :SET ALL BOSSTBLE BITS IN TXCSR 

SRESET * ISSUE RESET TO CLEAR BITS 
pop200 170240 CMP #BIT7,aTXCSR  ;SEE IF ONLY BIT 7 IS SET. 

BEQ ABA :BRANCH IF ONLY BIT 7 IS SET 
170232 001604 MOV JTXCSR,TXCSRT SAVE CONTENTS OF TXCSR 
000200 O01616 MOV #8117 ? TEMP “MOVE EXPECTED TXCSR TO TEMP. 
004474 JSR S,OACNY -GO TO OCTAL TO ASCII CONVERT. 

TEMP :SOURCE ADDR. 

ATKSB ; DESTINATION 

:#OF DIGITS T 


6 I 0 CONVERT. 
004474 JSR %S , OACNYV :GO TO OCTAL TO ASCII CONVERT. 














at 


° 


fot 
cx. 
Oe 


OananNn NOOIOOV0IN00H 
ed ee ed ed ee ed ee ee ee 


“MOC tI9090909 O09 
ane 


0-2 2b ho 00-2 0 b- 0&2 0B = <2 po 0 ho heh 2h oe 


SWI 0CIWIGIGIIWIGICOITUTULUPUTUPULULTUNUITUD + oo 8 8b 88-0 (CO OOOONOYM 
ee ee a RIN Plots Cem -2er ute Corus CBee I ble 


0 +0 0-0 0 + 0-2 b+ 0-9 b= 0h -+ hb 9b 8b <8 ood 


TOPOTOTOTUTU TUCO TOTO TU LTUPOTUPUTU LULU PU PUPUFUTUPULUTUPULUlUTULUIL NITUTUUrUrUNn Uru rUururururmMrmrmmrurrurnr 


+0 + 0-<b- 0-2 b+ 9-1 
Tutipe—o- oe - 
MWOW £fuc 
--€)° 3828 


furuturuy = fufurorurororuty 


~ WORE Ble 


0-2 0-- 0 —b-s 
Mound 


See e 


MIOONIOOM 
Ce b-- »-- (~ 10 


SHEER ER anes 
Stat 


8 
2 


& 
8 


sr 
grBERe 


ONLOC 


tt tt br 
futoe tu 
Or- 


3 
LAU 3 


b+ b-< p= B= b 2 bo & -= 0&2 & < &  & 2 B= 0 fo & = 0 0 9-0 Bo §- = = 0 oe 


0 ~ 0-H 0-< b-< b+ b—* & 0b = B-2 b= Be §- 0 2 & =e b -2 b+ ho b= ho Oo f= § 2 Bo Bo he 2 Bo 
PP. 
» 


OOOH ONAVSOOHOOVOOOOKOOMO0N0000IC 


& Fy GIGIts 
foes 4. 


++ >-+5- 
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009349 
2900 
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;TEST THAT RESET 
AeSEAR TO SEND, CARRIER 


ob —6 <9 
NINN 
oOoc;3 
0 he aa 
GJ) 6 > 

Ormomono 


10, , ADA 
ADA, 19. 








10 


@PRIY? PSW 
sBITl adRXz5h 
8-1, aRXCSR 
#4, TXCSR 
aTxSurF 


i, aTxBuF 


s8xCSR, RXCSRT 
#300Ce , RXCSRT 


a 
230002, TEMP 


“8, ORC v 


%5, ORCNY 


s8IT1,aRXCSR 


;TEST THAT LOADING TXBUF (TRANSMITTER BUFFER) CLEAFS TACSR SIT 7 
eno WITHOU JT mr a READY 


a ee = en ee ene. 


THAT TXDONE SETS 





;SOURCE ACOR. 

;DESTINATION ADDR. 

;80F DIGITS TO CONVERT 

sRESET FAILED TO CL ERR ALL SITS EXCEPT 
;B1T 7 - SEE PRINTOU 

; SCOPE 


0. ,ACA,O 
ACQ, 10. \X4140, \X+2, \X41 
tasenenscneconennebientennssehoossieensessensunesnnesesesconsensesensnessnneniie 


i TEST NUMBER 

; ADDR ess OF NEXT TEST 
: ITERATION COUNT 
; SCOPE ENTRY POINT 


OeOnI EEESDSEOESESESASSSESEEEEEDEASELOREREESEREREEDSEGEESESEESSEEESESERREOESEN 
CLEARS eT RXCSR BITS EXCEPT DATA TERMINAL 


READY, RING 


3&7 PRIORITY 7 
LEAR DATA TERM.READY 
3 a ioe BITS IN RXCSR 


; ERRO NE_NOT SETTING 

; ISSUE RESET TO CLEAR SITS. 

3; MOVE os CONTENTS TO RXCSRT 
;SEE IF ONLY BITS 1, 12,13 SET 
sBRANCH IF ONLY BITS 1,12,i3 SET 


:G0 70 gt TO ASCII CONVERT. 


3S 

i BESTENATION. ADDR. 

:@OF OIGITS TO CONVERT 

330 TO te TO ASCII CONVERT. 


EAR ALL 8 
T QO. SEE ERROR PRINTOUT. 
CLEAR 0 DATA TERM. READY 


. CD 
, \X#14CD, \X42, \X41 
-seseesssgaannesnenbansbeccsanebassndensnaaaaanacanessnesenstasesaseats PRSLTARIVA 


3 TEST NUMBER 

;ADDRESS OF a fl TEST 
; ITERATION COUNT 

: SCOPE ENTRY POINT 


 PoeeAESESEERDEGSAEASSADADOSEASDSEAEREEGEEA RARER ERA SRARE ARE RER RAE LAERAEREEaEEEee 
\REARCY) 


sLOAD *XB8UF 
















CO4 
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DrDLAF.P 1! 
2141 O11410 104920 TiMETX -TIME QUT TX DONE 
2i42 O1i4le 104003 ERROR ER ROR Ost NOT SETTING 
2143 011414 O50. Lg777 UR ITxBUF LOAD BUF 
siv4 Qii¥ed 105077 1errrg TS a@TxcSR itecy ies SIT 4 (READY BIT) 
S48 311484 160092 BPL ADAB ‘BRANCH IF SIT NOT SET. 
2148 1 14e6 1940 RROR ‘ERROR. LOADING PT FAILEN TO CLEAR READY. 
ei4>  O114 046° R ADAC 
2148 11432 104020 ADAS: . TIMETX ;WAIT FOR DONE 
£:43 ata 104053 o~ ERROR ;CONE NEVER SET 
2:50 511836 O3277? oc0z00 187750 SIT aBIT7, ITXCSR ) 
£151 11444 091901 BNE +4 
2:52 911446 104993 ERROR ;READY DID NOT SET 
2:53 011452 10401} apac: SRESET 
2154 O11452 iosole SCOPE SCOPE. 
2:55 11485 TSTA_ =: 1. , ATA.C 
2156 511454 TSTAA «AIA I. \xe140D, \xe2, xe! 
2157 sspunsenatancasstandsibeccsssobestsbetasasssonsossnennensesenssssssssesesseneens 
2158 911454 100034 Ar34: 100034 ; TEST + 
Si5S O1isSe 11775 AT35 t ARBRESS MBER liext TEST + 
2169 911460 99900! ‘. : ITERATION COUNT + 
2162 O1l4s2 S11464 AIAA : SCOPE ENTRY OSDINT + 
216= 995034 X=X¢] * 
elgb2  RPRESEEEOEEESEEESEESGESEEEES EGOS SERERELESERSEEEESORSEREERESESSESELESESEEEELESES 
e164 i TEST THAT TRANSHZT SPEEDS ARE ARRANGED IN RSCENDING ORDER SY CHECKING THAT TIME 
ae = PEADY SIT (TXCSR BIT 7) CECRERSES AS A HIGHER SPEED IS SELECTED. 
2:65 O11464 OO4T37 COeEIE irAa: JSR “? DOTHIS :TEST IF THIS eer SELECTED 
2167 911470 104001 TYPES 
2:68 Olis7e Gis?73 MSETTX 
2188 O11874 917021 MSETC 
el7o B11476 817303 mso 
elr: 11500 17777 -| 
2:72 911502 600000 HALT 
2i73 911594 904737 O11712 ISR “7 ,AIAS OUTPUT CHAR AND TIME. 
2174 O115:0 613737 O1i774 ociss4 “By AIAST STRO :MOVE ELAPSED TIME TO CTRO. 
2i7S O11516 laja) TYPE 
2:76 911520 017313 MS} 
sine RHE REE ys Bor eae ret case me re. 

of . > ‘ ae - be . “7 = © OUT ( C TI 

5158 331254 Brass Sy ioa5 DO1SeE MOV AIAST cTR: “MOVE ELAPSED TIME T> CTR. 
2:80 911536 194000 TYPE . 
218: 611549 617323 MS2 
2162 O11542 00 HALT 
2183 911544 994737 911712 JSR 7 AIAS :OUTPUT CHAR AND TIME. 
2184 O11550 013737 011774: 001579 MOV AIAST, CTRe “MOVE ELAPSED TIME TO CTR2. 
2185 911556 104009 TYPE 
2186 911560 017333 MS3 
2187 O11S62 5 HALT 
2182 O115€4 004737 O11712 JSR “7 ALAS: : S OUTPUT CHAR ANC TINE. 
2383 011570 013737 011774 oD1S72 MOV AIAST,CTR2- “MOVE ELAPSED TIME To cTR3. 
2186 011576 104000 TYPE 
2£i3i 611600 017343 MS4 
2182 S8iiso2 900900 HALT 
2193 O11604 004737 9011712 ISR “7 ,ATAS ;OUTPUT CHAR AND TIME 
2:94 S11610 013737 O11774 o01s74 MOV AInST,CTRY : MOVE ELAPSED TIME To TRY 
2iSt SLIEIE 104080 TYPE 
EiS¢ S11620 017352 MSs 
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° 

3§ 
33 
ra’ 


23 


ee 
Orwrwrrwa 
PIE £ Ee 


SMe 


“IIINMON OOo 
# Ffoo 


-~ 
| 
~“I 
+ 


“J 


mcm © 
PrhL OM mw 


Mrurrururulururofrurururunrururturtururururrns 
fUs--e- 


) 
uUrurururundfurofrurroronruimrorrurorur fururus o--»-- 


StU CRD IOUT EG Ur Dw tr UTE Gore 


ONO AOH0O000OD OQOOOIOVO0KOOYID BWONIVIOAOOMOOVBIOOWVVOVOOOHO A+ 


SINISNINII IOI 


0 = 0— 0-9 oh 
N~Io 
rae P 

tor 


Ba aaa 


+ b-+ 6 po b+ >< b+ 0 Bo eh 
3 


ne a a a ee 





“7 AIA 
AIAST,CTRS 


“7, AIAS 
AIAST, CTRE 


2 
aTXCSR 


1C., 


SETTING 


SUF 


JRXCSR 
RLAB 





A,O 
ALA, iS V\X#149, ' 
rseeeeensaseseanassuensbcensobansabansneansonsnavensaneccccseconssegnenecesesses 
nT 38 


;SEE IF DONE SIT I 
;SRANCH IF DONE BI 





;OUTPUT CHAR AND TIME 
;MOVE ELAPSED TIME TO CTRS 


OUTPUT CHAR AND TIME 
:MOVE ELAPSED TIME TO CTRE 


; OUTPUT CHAR AND TIME 
;MOVE ELAPSED TIME TO CTR? 
: CHECK half Ay; THROUGH CTR? CONTAIN 
; DESCENDIN UES 
; TRANSMIT NepeeDS NOT ARRANGED IN 
: BSCENOING ORDER. 


:5¢ 


;CLEAR ELAPSED TIME COUNTER. 
;WAIT FOR TX READY. 


;LORD TXBUF . 

WAIT 7S US 
: INCREMENT ELAPSED TIME COUNTER. 
:BRANCH I IF READY NOT SET. 


\X42, \X4] 


; TEST NUMBER 

‘ ADDRESS OF fa TEST 
ZITERATION COUNT 

:SCOPE ENTRY POINT .- 


ssoeeeaesantianeateestesseanseaslosraasnaceasnnaenazniteastateaneznnenteaneenss 
:TEST THAT OUT PUTTING A_CHARACTER WITH THE MAINTENANCE SIT SET (TXCSR BIT = 

RE IN DONE SIT (RXCSR BIT 7)_NO LATER THAN SOO NSECS, 
;THAT RESET INSTRUCTION CLEARS THE DONE BIT 


#B81T2, aTXCSR 
aTx ” 


:SET MAINTENANCE BIT 


:LOAD TXBUF 
‘WAIT SCO MSECS. 


S SET 
TTS 


SET 





AND 





a eee on - 


ee eee + 


-MSIN, MACYLL 

DIOLAF P11 
2253 012032 
2254 912034 
255 012036 
2256 912040 
22S? O1eC44 
2258 012046 
e259 912050 
e260 9:20Se 
2261 0120Se 
2eb2 
S263 012052 
e264 012054 
e265 012056 
2266 012060 
ecks 
2268 
2269 
a 
i ie 
ee. J 
3555 012074 
2274 91e076 
e275 012100 
ee7& 912104 
eer? 012119 
ee78 Olelie 
e279 012114 
2e80 [012136 
228i 012116 
Se 
ee83 Ol2llé 
ecs4 012120 
22e8S Diele= 
e286 Oleley 
e287 
2288 
2285 
2299 
2e51 Ol2le6 
eeSe Dielse 
2293 012140 
2294 Olei44 
2295 012150 
e239 012156 
2e97 =912160 
2298 012164 
2e39 012170 
2300 Olei7e 
2391 912290 
e30e Oleede 
2303 012204 
e304 012206 
2205 Ole2i4 
2306 Cleele 
e307 Cle2ed 
2308 Ole2e4 





104012 


109037 


2S-FES-76 


1$7344 


00S004 
187322 


187308 
167300 


002756 


004000 


001616 
187220 


CCLE16 


co400C 


187324 
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167254 


167232 


900000 


E04 


aaa aa ;DONE SIT FAILED TO SET 
ALAS:  SRESET ; ISSUE RESET TC a DONE SIT 
TSTB JRXCSR :SEE IF DONE BIT IS CLEAREC 
BPL ALAC ;BRANCH_IF CONE BIT IS CLESRED 
ERROR SRESET FAILED TO CLEAR CONE SIT 
ALAC: SCOPE ; SCOPE 
TSTA 100. 


A,CD 
TSTAR AMA, io \X#140D, \X#2, \X41 
ytapereessassasassabnesileasaniataaeatasesassasseranessassasssssesaessesscasssess 


AT36: 100036 ; TEST NUMBER * 
AT37  OSDREGS OF NEXT TEST $ 
100. s ITERATION COUNT s 
AMAA :SCOPE ENTRY POINT é 
X=X+] + 


janpeesnnesensasanacensnneceesesieeenenenansnsenenenieaenensnsesncascensssss easy 
TEST THAT DONE BIT (RXCSR BIT 7) IS CLEARED BY READING RXBUF. _ 
jDONE SET BY OUTPUTTING CHARACTER ih. MAINTENANCE BIT SET (TXCSR SIT 2) 


Ana BIS #B1T2, JTXCSR T MAINTENANCE BIT (TXCSR BIT 2) 
CLR aTXBuF ‘LOAD TXBUF 
TINERK :WAIT FOR DONE BIT TO SET. 
TST IRXBUF :READ RXBUF TO CLEAR DONE BIT 
TSTB = ARXCSR :SEE IF DONE BIT IS CL EAR 
BPL AMAC :BRANCH IF DONE BIT IS CLEAR 
_ ERROR :READING RXBUF FAILED TO CLEAR DONE SIT 
AMAC: SCOPE : SCOPE 
TSTA 190.,A0A,CD 


TSTAA AoA; 100. : ‘XX#14CD, \X#2, \X41 
tisieeessssssvesantesssteseteceberesbacsteenneeneneeneneneeeeanienenesennnnnnes 


X=X+1 
sR ARRAS ER REE REESE RES RACEERE RAED EERE R RES EE REAR EREEEE SERRE REE REESE RESET SEES 
;TEST THAT RECEIVER ACTIVE SETS WHEN CHAR STARTS AND 
CLEARS WHEN RECEIVER DONE SETS 

JSR ;INIT IF g-0 DEVICE 


CDINIT 
AoAA: BIS aatte JTXCSR =; SET _ MAINT 
CLR uF ; TRANSMIT CHAR 


HT27: 150037 > TEST si 
ATYO  ABDRESS "ee “next TEST x 

100. s ITERATION COUN * 

AOAA ; SCOPE ENTRY BAIN * 

* 

* 


CLR te ‘B ?CLEAR BUSY INDICATOR 
AOAB: BIT BBIT11,QRXCSR  :IS RECEIVER ACTIVE SET 

BEQ AOABL :BRANCH IF CLEAR 

INC TEMP :YES, REMEMBER THAT 
AOAS!: STB  aRXCSR !SEE IF DONE SET 

BPL AOAB 

CMP TEMP, #0 :DID RECEIVER ACTIVE SET 

BNE AOAC 

ERROR sRECEIVER ACTIVE NEVER SET 

BR ACAD 
GOAC: BIT #BITL1,aRXCSR  ;DID DONE CLEAR ACTIVE 

BEQ ACAD 

ERROR :NO RECEIVER ACTIVE DID NOT CLEAR 
ROAD: ist JRXBUF -CLEAR RX DONE 


a te eee oe ee eee 











FO4 
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2303 12226 TSTA =: 1. , ADA, 9 
2310 Ol2226 TSTAA ADA, 1. | \X#140, \X#2, \X+1 

eall RRR RARER EERE EERE EERE EERE LEER EERE RE RELE EASE EATER ALERE SEES EAL EEEESS EERE EEE HE 
BE 9122 5 THO: ; TEST NUMBER * 
a HES ee te oor oe TEST 
Bile 515530 81 38 Adgaa SCOPE ENTRY POINT t 
2316 090046 X=X+1 ‘ 
23i7 peopepengns sepeseunecepesupenen ecuepannenbenenensusessenonnqesesenoenienenensin 
2318 :TEST THAT RECEIVE SPEEDS ARE ARRANGED IN ASCENDING ORDER BY CHECKING THAT TIME 
2318 : ELAPSED TO DONE BIT SETTING (RXCSR SIT 7) DECREASES AS A HIGHER SPEED 

2320 THIS IS NOT DONE IN MAINTENANCE MODE TX AND RX 

232! 'POTs MUST BE STEPPED TOGETHER 

see -1§ SELECTED. 

2223 012236 OO4737 O0Sz16 AQAA: SR “7, DOTHIS ;CHECK IF THIS TEST TO BE DONE 

2224 012242 194001 TYPES 

2325 Olee44 O1S745 MSETRX 

2325 12546 017021 MSETC 

2327 Ole2SO 017303 50 

2328 012252 177777 -. 

2229 012254 900000 HALT 

2330 O12256 904737 912464 ISR “7  AQAS ;OUTPUT CHARACTER AND TIME DONE BIT 

233: Olecbe 013737 Olise6 001564 MOV AQAST, CTRO :MOVE ELAPSED TIME TO CTRO 

e332 Ole270 104900 TYPE 

2333 012272 917313 MS) 

2324 912274 000000 HALT 

2335 012276 004737 C12464 JSR “7 ,AGAS ;OUTPUT CHARACTER AND TIME DONE BIT 

2336 012302 013727 Oles26 ooses MOV AGAST, CTRL !MOVE ELAPSED TIME TO CTRI 

2337 912310 104000 TYPE : 

2338 012312 017323 mS2 

2323 012314 900000 HALT 

2340 O12316 004737 O12464. ISR “7 AAS :OUTPUT CHARACTER AND TIME DONE 3IT. 

2341 912322 013737 Oles2e 017 MOV AQAST, CTRE ;MOVE ELAPSED TIME TO CTRe. 

es42 012330 104000 TYPE . 

2343 Oless2 017333 MS3 

2344 912334 900000 HALT 

2345 912336 004737 O124E4 ISR 47 AGAS : QUTBUT CHARACTER AND TIME DONE SIT 

2246 Ole242 013737 Slessé 001572 Mov AGAST,CTR3 MOVE ELAPSED TIME TO CTR3. 

2347 012250 104000 TYPE 

2348 912352 017343 MSY 

2348 012254 900009 HALT 

2350 012356 004737 o12464 JSR “7 AGAS 

2351 Ole 913737 O12526 o01574 MOV AGAST, TRY 

e2s¢ 012370 104000 TYPE 

2253 912372 017353 MSS 

2354 612374 900000 HALT 

2255 012376 004737 O12464 ISR “4? AQAS 

2256 012402 013737 Cle526 001576 MOV. = AGAST, CTRS 

e257 912410 104000 TYPE 

2358 Ole4ie 017363 MSE 

2259 912414 00000 HALT 

2260 Ole4i6 004737 o124e4 JSR 6? -AQAS 

2361 Ole422 013737 OLZs26 oolsoo MOV AGAST, CTRE 









































24 





o— 0 &-- b= &— b= b= 6 -= b=  — 9 —= 9-2 po 


b= b—2 §-« b= 9-2 bo 2 fe 


OdOdOOVOONVOO00NO Sh Spd pent end eetenp peperd ard 
a) 
2 


104012 


305937 


105777 


000041 


004737 
737 


012654 


aaa 


001610 


640090 


25-FES-"6 









166600 


166560 


166544 
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MOV AgAST. CTR? 
Wes 4 2net 
R ache 
ERROR! 
RXTIM 

AQAB: SCOPE 

AQAS: CLR AgAST 
TST8. =: ATXCSR 


agasa: ih a7. TIME 


NC AQAST 
TSTB = JRKCSR 
BPL AQASA 
__ RTS “uP 
AGAST: OPEN 


TSTA 10., 


;CHECK THAT bay THROUGH CTR2 CONTAIN 
; DESCENDING NG VALUES. 

: RECEIVE SPEEDS NOT ARRANGED IN 
SRSLENOING 0 RDER. 


;CLEAR ELAPSED TIME COUNTER AGAST 
;WAIT FOR TX READY. 


; CLEAR Rp BIT IF SET 
LOAD TXBUF 


ME SET? ELAPSED TIME COUNTER 
: BRANCH IF DONE NOT SET 
ELAPSED TIME COUNTER 


ARA,CO 
STAR ARA, 10. , \X#14CD, \X#2, \X+1 
Tc ill t+ hlelteaeeeelebbeheeb-1--n' 17> lehheeelblaaeeeeieilalaeieeibbaeeiele 


ital: 190041 


10. 
ARAR 
X=X+1 


jsnnesaseasnsensnesnessneaesssasinanssanseaeantsnataeatanstsanarananeesnestasaes 
TEST ¢ oe’ ad ARS OF DRTA TAT BIT (RXBUF 


ARA 


MOV SPXBUE RKBUFT 
BIT #1714, RXBUFT 
- 


RXBUFT 
+6 


BIT #51714, IRXBUF 
BNE +6 


%7  ARAS 
BIT #81715, ORXBUF 


BIT sBIT14, IRXSUF 
+4 


(a eee ee eee ee 


;TEST THAT OVERRUN CLEARED 


5 Teat NUMBER 

ADDRESS OF ext TEST 
ITERATION COUN 

;SCOPE ENTRY BOINT 


BIT 
} Sceeectne AND Wars SCO MSECS 
;QUTPUT CHARACTER AND WAIT SCO MBeCS 
SAVE RXBUF CONTENTS + CLEAR DONE 
:SEE IF DATA OVERRUN SIT WAS ST 
;BRANCH IF BIT WAS SET 


;SEE THAT ERROR BIT WAS SET (RXBUF SIT 15) 


;ERROR BIT FAILED TO SET WHEN CVERRUN SET 


;SEE THAT DATA OVERRUN WAS NOT 
a WHEN RXBUF WAS READ 


;BRANCH IF SE 
;READING RXBUF CLEARED DATA CVERRUN 


OUTPUT CHAR +WAIT SOOMS 
;TEST THAT ERROR CLEARED 


° 
bd 
BI 
* 
= 





37, 9% ) 


wei Ae 


194912 
OSer7? 


004737 
104007 
012750 

77 


000772 


109043 


000043 


104007 


00771 


L0c044 


25-FEB-7& 


SCOPE ; SCOPE 
rent g 166532 ARAS: Re —_—- eT ee BIT 
BaLAY :DELAY SOO MSECS 


00351& 


990190 


- ees 


600100 


09910 
600199 


001426 
000109 
000100 


000100 
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+ 

Atu2: 100042 ; TEST NU s 
AT43 : ADDR ees "OF NEXT TEST * 

10. ITERATION COUNT ¥ 

TAA :SCOPE ENTRY POINT t 

= + 

1 HHHHH GHEE HHH HHHEHEHHHSH HHH HHHHH HEHEHE HEHEHE HHHHEHEEEHEE HEHE 


a 
ATAR: BIC #BIT&,aTXCSR DISABLE TX_INTERRUPT 


BI 
ATAB: SCOPE ; SCOPE 
ATAC: BAS #BIT&,aTXCSR ;HERE IF INT, DISABLE TX INT 


i-th ikke 


AT43: 100043 : TEST NUMS + 
ATS4  ADGRESS oF NEXT TEST * 
1000. s ITERATION COU * 
RUBA : SCOPE ENTRY BOINT * 
s 5 


Jennie raarsshinrnsinnnriensenaetenaraninenennstess 
;TEST THAT READY DOES NOT_CAUSE AN INTERRUPT WHEN THE PROCESSOR IS . 
ZAT THE ay PRIORITY AS THE TRANSMITTER INTERRUPT "REQUEST LEVEL 


A 
AUAR: MOV TXLVL, PSW ;SET PROCESSOR PRIORITY SAME AS TA PRIORITY 


NOP 
AUAB: Sito #BITE,aTXCSR 3 OK yF NO INTERRUPT OCCURS. DISABLE INTERRUPTS 
AUAC:  POPSP2 HERE IF INTERRUPT OCCURS. POP STOCK TWICE 
ERROR :TX_ INTERRUPTED WITH PROCESSOR AT SAME 
BR. ee :PRIORITY AS THE TRANSMITTER 


"ugar" ~ gaguanameemammene 1" elatmenamenamenaaednant maiaaur 
TH4: 100044 





HO4 











RTS 4? ;EXIT 
TSTA 10. ,ATA,CD 
TSTAA ATA. 10. | \X#14CD, \x#2, \X41 
1th -ilielieeeabs <->" peal 







;TEST THAT TRANSMITTER IS ABLE TO INTERRUPT. IF THE INTERRUPT IS SERVICED, 
SIT WILL HAVE ns AT THE CORRECT VECT We 

JSR 7, OVRLAY GO_TO OVER ROUTINE 

oF SET Ty TRTERRLPY SERVICE 











CLR PSW :SET PROCESSOR PRIORITY TO 0 
BIS sPIT6, ITXCSR ENABLE TX INTERRUPT 


NOP 
ERROR ;READY DID NOT CAUSE AN INTERRUPT 
I¢ #BIT6,a3TXCSR 
























R TAB 
TSTA ©1000 co 
TSTAA AA, isoo. "\X#14CD, \X#2, \X$1 

















;SET TX INTERRUPT SERVICE TO 


BIC #PI TE, ITXCSR 
BIS BITE. ITXCSR ;ENABLE TX INTERRUPTS 


TSTA 10., CD 
TSTAR AVA, i, W\X#140D, \X+2, \X+1 


TEST NUMBER 





MAIN. 





















MACYIL 27.732) 


DIOLAF.Pil 


013042 


04 


ONd00 VOOKOOOVGOHVOOO000 


OOOO WONHOOOOOOOOOOVOOV0O0ORMO0O0 


013124 


104012 


400033 


o0004S 


194007 


013246 
000046 


eS-FEB-""S 


000100 


000100 


009100 


000190 
177776 
000100 


000190 


“013214 


013210 





166332 


166319 


16627e 


166246 
166234 


166222 
lebee2e 
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104 


ATYS ;ADORESS 7 NEXT TEST # 
10. ITERATION COUNT + 
rated SCOPE ENTRY POINT : 
HHEHHEH SHEE HERE EEE OGRE eens 


:TEST THAT TRANSMITTER INTERRUPTS WHEN PROCESSOR IS AT PRICRITY ONE LEVEL 
;LOWER THAN THE TRANSMITTER INTERRUPT PRIORITY. 
STTXV ;SET TX INTERRUPT SERVICE TO AVAB 


Eva. 
avaa: BIC #BIT6,9TXCSR  ;DISABLE TX INTERRUPTS 
MOV TXLVL, PSW ;SET PROCESSOR PRIORITY TO ONE LEVEL 
SUB #40, PSwW ‘LOWER THAN TX PRIORITY 
BIS #BIt6,aTXCSR § :ENABLE TX INTERRUPTS 
ERROR vig ;TX FAILED TO INTERRUPT 
avAB:  POPSP2 sHERE IF INTERRUPT OCCURS. POP STOSK TWICE 
avac: Bic #BIT6,aTXCSR  :DISABLE TX INTERRUPTS 
SCOPE : SCOPE 
TSTA =: 100. cD 
TSTAA AWA ae ie \X+14CD, \X#2, \X+1 
ee? \peemenetatecenaeee ~~ aignenaeaene acacia 
4 * 
-ADDRESS OF NEXT TEST ‘ 
100. ITERATION COUNT ‘ 
BURA ; SCOPE ENTRY POINT * 
=X+ oa 
DETTE TEEN TTTTT TTT TTTT TTT TTTT TTT TTT TTT TTT TTT TTT TEETER TET TTT TTT TTT 
:TEST THAT TRANSMITTER DOES NOT REINTERRUPT AFTER THE INITIAL INTERRUPT HAS 
“OCCURRED AND HAS BEEN SERVIC 
AWAA: STIXV “;SET TX INTERRUPT SERVICE TO AWAC 
BIC BBIT6,3TXCSR § ; DISABLE TX INTERRUPTS 
CLR PSW SET PROCESSOR PRIORITY TO 0 
BIS wBITS,3TXCSR § :ENABLE TX INTERRUPTS 
ERROR : TRANSMITTER FAILED TO INTERRUPT 
AWAB: Bic #BITS,aTXCSR DISABLE TX INTERRUPTS 
AWAC: MOV WAWAE,JTXVTR § :HERE IF INTERRUPT OCCURS. CHANGE EXIT 
HOY #AWAD a4 :POINTER TO AWAD AND EXIT INTERRUPT 
AWAD: NOP aad :0K IF NO INTERRUPT REOCCURS. 
AWAE:  POPSPe2 sHERE IF INTERRUPT REOCCURS 
ERROR 0 TX REINTERRUPTED AFTER RT! 
iO A,CD 
TSTAA AXA; io "\X+14CD, \X#2, \X#1 
ptiecnenaseseseeeakenthenunesedosesiesseeeesnusvenneneesnenesscucesunnnnennenen 
T46: 100046 TER UMBER x 
ATH? ABGRESS OF NEXT TEST x 
10. ‘ITERATION COUNT + 
AXAA ; SCOPE ENTRY POINT ; 


HHH HEHEHE HEHEHE HHH HEHEHE HHUA HEHE UHHH a 


















-MAIN. MACYLI 

DZDLAF .P11 
2530 
2531 
S235 Wee 
S233 01380 
2535 piace 
ge38 Bi sadg 
2538 013260 
2539 013266 
2S40 013270 
2541 013272 
2542 013274 
2S4¥3 013276 
2S44 013304 
eS4S 013306 
2546 013306 
2S47 
2548 013306 
2549 013310 
2550 013312 
2eSS1 013314 
esSe 
esS3 
2s54 
2esss 
e556 bt 3316 
2S58 013324 
2559 013326 
2560 013334 
2561 013340 
25 013346 
2563 013350 
2564 013352 
e565 013354 
2566 013356 
2567 013360 
2568 013366 
2569 013370 
eS70 013370 
2571 
eS72 913370 
2573 013372 
2574 913374 
2575 013376 
2576 
2577 
257 
2579 
e580 613400 
2581 013402 
2eSb2 013404 
2583 013410 
2584 O13416 
2585 913424 


271732) 


oe 737 
Oraer4 


104012 


000047 
013370 
000012 
013326 
000047 


004737 


25-FES-7& 10:49 PAGE 48 


003516 


014404 


000100 


000100 


003516 


ooco44 
177776 
ooco44 


000040 


000100 


166134 
166122 


166104 


166054 
166042 


166022 


165772 
177776 
165756 


JO4 

















:TEST THAT RECEIVER DONE BIT IS ABLE TO INTERRUPT. IF THE INTERRUPT IS 
s SERVICED I WILL HAVE OCCURRED “Ay ; CORRECT VECTOR 

Stax ; ge, RX —o UNE og TO AXAB 
AXAA are wot to aRXCSR SBT SAnL E CRN INT 

‘ Re : Qi Bre cEScon R TERRES. To 0 

BIS #BIT6,IRXCSR § ;ENABLE RX INTERRUPTS 

ERROR on :RX FAILED TO INTERRUPT 
AXAB: POPSP2 sHERE IF INTERRUPT OCCURS 
AXAC: IC #BIT&,aRXCSR § ;DISABLE INT EN 

SCOPE : SCOPE 





10. ,AXI,0 
TSTAA = AX1 x VA\X#140, \X#2, \X#1 
yeveenenaneneaceutineibaneeebea EbAO EEDA aeaMEaAaTAaEaE Tea eaTeaE anata aaa 






& 

ATy?: ; TEST NUMBER “ 
‘ ABDRESS OF NEXT TEST * 

10. ITERATION COUNT x 

AXiA :SCOPE ENTRY POINT + 

X=X+] : 


(2380 SG 
TEST THAT MODEM INTERRUPT BIT IS ABLE TO INTERRUPT. IF THE INTERRUPT 22 
;SERVICED IT aay, oe OCCURRED Mb T6 aay VECTOR. 





JSR 0 OVERLAY ROLITINE 

STRXV :SET RX INTERRUPT SERIVCE TO AXAB 
AXIA: BIC 844, IRXCSR ;DISABLE MODEM INTERRUPTS 

CLR W :SET PROCESSOR PRIORITY TO 0 

BIS #44, IRXCSR ‘ENABLE MODEM INTERRUPTS,RQ TO SND 

DELAY 

ERROR a ;MODEM FAILED TO INTERRUPT 
AX1B:  POPSP2 sHERE IF INTERRUPT OCCURS 
AXIC: BIC #BITS,IRXCSR § ;DISABLE INT EN 

SCOPE 

TSTA 1000.,AYA,CD 

TAA AYA, doo "\X+14CD, \X42, \X41 






ypessseshissbessuantesanibasaiseedaerelaaeeesauarssaaanssaaessaaaessaanssaaesss 
ATso: 100050 ST NUMBER 
A ESS OF NEXT TEST 







TS1 ; ADDR 
1000. ; ITERATION COUNT 
ttnodl SCOPE ENTRY POINT 





ie Ee oc 


UPAR retrererseaeereceaebesseenereceerene rissa rites rietananaaanensnaeas 
TEST THAT RECEIVER DONE BIT DOES NOT CAUSE AN INTERRUPT WHEN THE PROCESSOR 
;1S AT ® ta PRIORITY LEVEL AS THE RECEIVER INTERRUPT REQ wt LEVEL 

STR ;SET RX INTERRUPT SERVICE TO AYAC 








AYRC. 
ISR 47, STRXD :SET RX DONE BIT 
AYAA: BIC atte aRXCSR ‘DISABLE RX IN 





TERRUPTS 
SET PROCESSOR PRIORITY SAME AS RECEIVER'S 
ENABLE RX INTERRUPTS 





RXLVL , PSW 
#BIT6, IRXCSR 





2 hs ee he fe fe Fh fe fe ge 
uw 


104012 
100052 

44 
013556 
00052 


004737 


Cee626 
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000190 165746 AYAB: 


iil 1 blll sean ++ ‘n "1" hla 
NUM 


23H AGHIOS HEHEHE 
TEST THAT RECEIVER DONE BIT CAUSES INTERRUPT WHEN PROCESSOR s AT PRIORITY 
: ONE ie tone THAN THE RECEIVER’S INTERRUPT REQUEST LEVEL 


TSTAA 
1 ilk f-++-> iii heehee 
2 


1 
1339 
TEST THAT RECEIVER DOES NOT INTERRUPT AFTER THE INITIAL INTERRUPT HAS 
ae 4 DONE ok TRND: NOT BEEN CLEARED 


SCOPE 
OV #AABE , JRXVTR ;HERE IF INTERRUPT OCCURS. CHANGE SERVICE TO 
MOV #AABD , Xb AABE, SET EXIT POINTER TO AABD 
RTI fEXIT’ INTERRUPT SERVICE 
e ange 0K IF NO INTERRUPT REOCCURS 
] 
POPSPe2 ;HERE IF INTERRUPT REOCCURS 









KO4 

















NOP 

Sioa #BIT6,dRXCSR COPE NO INTERRUPT. DISABLE RX INTERRUPTS 
POPSPe ‘HERE IF INTERRUPT OCCURS. oe a a ae TWICE 
ERROR :RX INTERRUPTED WITH PROCESOR AT SAME 

an AYAB PRIORITY AS THE RECEIVER 





10. ,AZA, 
TSTAA AZA, 10. | \X+14CD, \X42, \X+1 







+ 

TS? ADDRESS OF NEXT TEST ‘ 

10. : ITERATION COUN % 
AZAA SCOPE ENTRY BOINT ¥ 
X=X+]1 % 







;SET RX INTERRUPT TO AZAB 








JSR TRXD :SET RX DONE BIT 
BIC fatto. JRXCSR  ;DISABLE RX IN 









TERRUPTS 
MOV RXLVL, FSi sSET PROCESSOR PRIORITY ONE LEVEL 
SUB OWER THAN RECEIVER’S PRIORITY 
BIS SB] te ORXCSR ENABLE BN INTERRUPTS 
ERROR :RX FAILED TO INTERRUPT WITH PROCESSOR AT 
AZAC ;PRIORITY ONE LEVEL LOWER THAN RECEIVER’S 
POPSP2 "HERE IF INTERRUPT OCCURS 
BIC #BIT6,aRXCSR DISABLE RX INTERRUPTS 
SCOPE : SCOPE 
TSTA =: 100. 





B,CD 
AAB iso” \X#14CD, \X+2, \X41 







; TEST NUMBER 

ADDRESS OF NEXT TEST 
100. ITERATION COUNT 
AABA SCOPE ENTRY POINT 






mK oe ic 






L 
;SET RX DONE BIT 
ey ;SET RX INTERRUPT SERVICE TO AABC 


A 
BIC #BIT6, IRXCSR ;DISABLE RX_ INTERRUPTS 
BIS #BIT6, IRXCSR ENABLE RX INTERRUPTS 


NOP 
ERROR ;RX FAILED TO INTERRUPT 
BIC #BIT6, JRXCSR ; DISABLE RX INTERRUPTS 

































. MAIN. 
DZDLAF. 





MACYL1 


Pli 


013634 
013636 
013640 
013640 


271732) 


104003 
000761 


100053 


900053 


004737 


104012 


100054 


000055 


004737 
004537 
104012 


2S-FEB-76 


014404 
165530 
165522 


165514 


014404 
4 


009:00 


000100 


002706 
004770 


001508 


165456 
165444 


165426 
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LO4 






;RX REINTERRUPTED AFTER RTI 







R 
TSTA B,CD 
TSTAR 3 106 "\X+#14CD, \X+2, \X41 

sensed Martti l Bi LGR GE 8 enensrnsnnsonsonennenernveon 








TS3: 100053 ; TEST NUMBER % 
ATS4 7A BRESS OF NEXT TEST % 
100. ITERATION COUNT % 
om od SCOPE ENTRY POINT : 
RE SEAS ae TeS AA Et Tr 






:TEST THAT READING RXCSR DOES NOT CLEAR DONE BIT (RXCSR BIT 7 
ABBA: JSR %7 , STRXD ;SET RX DONE BIT 












MOV anit, RXCSRT  :SAVE CONTENT OF RXCSR 

TSTB :SEE IF DONE BIT IS CLEAR 

Bh aeeee BRANCH IF DONE BIT tS NOT CLEAR 
ABBB: TST JRXBUF ;CLEAR DONE BIT IF SET 

SCOPE a : SCOPE 


B,CD 
TSTAA ACB 15”? \X#14CD, \X#2, \X#1 
yeapeneuneaeaensaabeneibaneinta be neE ben EEDESEA TE EEEEEEATEOO HEDEE TEETER EEE 








Ats4: 100054 Test UMBER x 
ATSS ADDRESS OF NEXT TEST x 
100. ‘ITERATION COUNT x 
ACBA :SCOPE ENTRY POINT * 
X=X+]1 s 





1390099 
:TEST THAT — CAN CAUSE INT WITH ERROR SET 
ST ;SET RX INTERRUPT SERVICE TO ACBB. 


x STRXD ;SET RX DONE BIT 
JSR STRXD ;SET RX DATA artes 









ACBA: 









BIC ‘atte, JRXCSR = DISABLE RX INTERRUPTS 

CLR PSW SET PROCESSOR BRIORITY To 0 

BIS #BIT6,dRXCSR § :ENABLE RX INTERRUPTS 

ERROR we RX DONE FAILED TO CAUSE INTERRUPT 
ACBB: POPSP2 ;HERE IF INTERRUPT OCCURS. POP STOCK TWICE 
ACBC: BIC #BIT6, IRXCSR 








cD 
TSTAA Te 9 "\X+14CD, \X+2, \X41 
{SUH HEHEHE ESHA AHS HE AHA EEESR a AR ESE ERaRER 
ATss: 100055 : TEST NUMBER 
ATS ‘ADDRESS OF NEXT TEST 
a ITERATION COUN 
RODA ; SCOPE ENTRY BOINT 


HEEB SHEE HEHEHE EGE G HOHE HEE EES TES EE 


;DATA TEST USING NORMAL CONFIGURATION 
JSR %7 .CDINIT sINIT IF C-D DEVICE 
ADDA: JSR S,OATTST 


TSTA 3.,APB,0 









EO eK ie 








Pv ebie 271732) 10:49 PAGE S1 











APB, 3. , \X+1+0, \X+2, \X+1 
B-flat aelaebaetbebleeiaeliabiatbatie--1--tl f-++-tlalbataabbaltlaeblaboaioaebleibolebalaeisiiolt 


; TEST _NUMBE 

s ADDRESS Mf NEXT TEST 
; STERAT ION COUN 
;SCOPE ENTRY POINT 


RTT TEE SeT TTT TTT TT TTT TTT TTT TTT TTT TPE TT TTT TTT TTT T TTT TTT TTT TTT Terr TT TTT err 


:DATA TEST USING JUMPER CONNECTOR. 


;USES SPECIAL we te COUNT PATTERN FOR DATA. NO INTERRU 
JSR « LIZE_ BINARY COUNT PATTERN 





2K OK NK CK 


; INITIA 
3ST CHARA “Us. COUNT T 
TX DONE 


TIME OUT 


‘ERROR DONE NOT SETTING 
:GET BINARY yds 


;SAVE CHA 


R IN CRBUFA AND 
MASK OFF NON TRENSHITTED BITS 


LOAD CHAR. 
TIME OUT 


RX DONE 
ERROR DONE NOT SETTING 
LOAD RECEIVED DATA INTO CRBUF 








xT, 0 
»\X+140, \X+2, \X+1 


TSTAR 
cepperves ferneeceunbaibaneaatianea eee ee reaneacenneaneeneeneeanaeenseteateny 


CHECK DATA 

: TESTED oe gerne ane 
;BRANCH IF 

; YES. SCOPE” 


; TEST NUMBER 
‘ADDRESS OF NEXT TEST 


; ITERATION 


:SCOPE ENTRY POINT 


+ 
803g 





; TEST THAT ROR BUSY TURNS OFF RDR ENABLE 
jHHEN RUN AN XOR TESTER 


MK KK OK ic 


SFT ROR ENABLE, SEE IF RDE IS TURNED OFF BY RDR BUSY 
;WAIT LOOP FOR XOR TESTER 

;SHIP OUT CHAR. 

; TEST COMPLETE 








;ALLOW TIME FOR ROR DONE TO SET 
;FAILURE OF ROR DONE TO SET 





x,0 
TSTAA \X#140. \X#2, \X41 
sgussangdansesensbenshascboshalyystaaaatasssssasnesasnsenneeteanenenanaanaay 
6 % 


TEST NUM 
ADDRESS OF NEXT TEST 
ITERATION COUNT 














eS-FEB-"E 


~--s 


0-0 +0 <0 6-9-2 09-26 ~ pee i 


SELLA 
luGIGst 


PS 


Cuteteteoty 


pata 


COMYIOOWOOOMO 
4. 
cS 
© 


Feptuptetute 


(ocr 





LESO4S 
185049 
185024 


399069 
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WINTILWICOM -4-2z@w 
Cr AD ADIT ZZ De 


ee ee ee + ee oe 


S w8IT2,aTXCSR 
§ #8170. aTXCER 
\ 8252, JTXBUF 


S = aRXBUF, #0 
+4 
0 





;SET MAINTENQNCE BIT IN TXCSF 
;SET BREAK BIT 

:LOAD BUFFER 

st? vel “Ow NE 

sERROR DONE NOT SETTING 
CHARACTER RECEIVED SHOULD 3E 9 


;CHARACTER OTHER THAN © 
;ISSUE RESET 





COS 


S5-FEG-"S 10:49 PAGE S4 





DIDLAF . P} a 
2920 
2821 - {SUBROUTINE TO SET RXCSR DONE BIT. 
2322 guyaos OS2777 oco0os 1sso02 e153 _ ee xCSR ss SET NE INTENANCE BIT 
s8e3 Rta} 40:7 ’ fiher ih ME OUT TX DONE 
2825 014420 104903 ERROR :ERROR DONE NOT SETTING 
2826 014422 900207 ore RTS “? sEAIT wey OM. grt 
ese. SUBROUTINE TO CHECK THAT CTRO THROUGH CTR2 CONTAIN DESCENDING VALUES. 
2828 014424 023737 001584 oc:s6s aMPT: CMP  CTRO.CTR! 
2829 914432 101439 a SLOS . CMPTNG 
3830 914434 O73, oc1s6S 01579 CMP STRI,CTR2 
2831 Si4442 101424 BLOS  CMPTNG 
S532 O14444 O23737 co1sTO cOo1sTe2 SMP CTRe CTR 
2833 O14452 101420 ec i: SLOS MPTNG 
2824 S14459 023737 ocos72 01574 CNP CTR3 eTRY 
e835 Si44h2 151414 3L0S MPTAG 
2836 Si4464 C2373? co1s74 oO1sSTs CMP cTRY CTRS 
S037 914472 101410 SLO THE 
938 014474 023737 001578 oD1600. CMP ZTRS. CTRE 
$39 914Ss92 151404 BLOS ¢MPTAG 
s3¢ 914504 623737 901800 ocolece CMP CTRE, CTR? 
84: 518512 1019A2 BHI CMP TOK 
S42 214515 O6271E c00002 CMPING: ADD ae “é 
843 514630 356628° ZMPTOK: RTS 


foturtururorur 


ee ne eee ee eee 



















DOS 
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5b telat 
:PRGI - TRANSMITTER SCOPE LOOF 
, eeeeRESESE 
PRSI: yee ;TYPE PROGRAM TITLE. 
004132 JSR 5, LINSLX $0 GET LINE # FROM USER 
TYPE TYPE SELECT CHAR AND DELAY 
SELCAD 
oo3ss4_— ISR PC RDOCT sREAD IN para. 
001822 MOV (30% +. TEMPE STORE DATA 
OG1S22 O14SS4 FRGIA: MOVE  TEMP2.PRGIB DELAY COUNT TO PRGIE. 
001623 164634 MOVE tEMPSs 1 3txeur LOAD T XBUF 
DELAY :DELAY # OF MSECS. SET AT Sm. 
PRGIB: OPEN 
PRGIA s REPEAT. 
5 SHERERAELE 
-PRG2 - RECEIVER SCOPE LOOP 
2822 + SPHSSRAESS 
2863 914570 194000 base: TYPE :TYPE PROGRAM TITLE. 
2864 014572 915791 P2TIT A . 
2865 014574 904527 004132 JSR. ss S, LINSLX :G0 GET LINE ® FROM USES 
2866 914800 104000 TYPE I TYPE SELECT CHAR AND DELAY. 
est? 914602 01572 SELCAD ; 
2868 914604 004737 003554 JSF PC .RDOCT :READ IN bara. 
2969 Di46i0 012637 001622 MOV (SP)+, TEMP2 STORE DATA. 
2870 314614 052777 OCOOCOY 164572 PRG2A: SIS #3172, aTXCSR :SET MAIN NTENANCE | ert. 
2571 Ol4$2e2 113737 S0is22 014649 MOV TEMPS | PRGOR -BELAY COUNT TO PRSeS. 
2872 914630 113777 991623 164560 MOVB TEMP], aTxSUF :LOAD TXSUF. 
2873 O14836 1040: DELAY :DELAY # OF MSECS. SET 
2874 O14640 990000 ©R528: O8EN 
2875 Ol464e 017700 164544 MOV DRXBUF “0 :RXBUF CONTENTS TO RO. 
2876 Si4s4é 990905 RESET :DISPLAY CONTENTS OF RXBUF (IN RO), 
esr? Oi4650 900005 RESET -3Y ISSUING S SESET INSTRUCTIONS 
227s 914652 900005 RESET 
287S 514654 o0000¢ RESET 
S28f Si4ete C0095 RESET 
2EEl S148—9 SCCTss oR PRGZA 


eee ae ee 





, 
ae 


+} = 6-2 p< pb 9 


rururururururururuluro rary 
+> + 0-2 b-2p* 


60.0.0.00.0.0.0.0.00.0 


Ture o-- 


(OO .00N@U1£ Gru, 
Ooaoao 


- 


25-FES-76 


004132 


OO35S4 


001$e2 


001623 


014754 


poaias 


Biaees 


code0t 


060034 


164364 





001569 


163212 


1e4414 
1S44O4 


001556 
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PRG3: attr : TYPE PROGRAM TITLE. 
S,LINSLX :GO GET LINE # FROM USER 
PE :TYPE: SELECT CHARACTER. 
SecA 


PRS3A: mene 


BR 
5 RAEREEEERE 
>PRGY - SPECIAL SINARY COUNT MAINTENANCE MODE DATA TEST. 
+ LERELERESE 
RG4: a ; TYPE PROGRAM TITLE. 
JSR S,LINSLX ;GO GET LINE # FROM USER 
JSR %?, INBIN ; INITIALIZE BINARY COUNT. 
FRGYA: JSR %7 ,GTBINP :GET tat! CHARACTER, 
MAY %1, CRBUFA :SAVE AT CRBUF 
JsR %7  MOUTIN :G0 OUTPUT, RECEIVE, AND CHECK DATA. 


BR PRoYA : REPEAT. 
gu PRUE TO OUTPLT, RECEIVE, AND CHECK DATA WITH MAINTENANCE SIT 


ee ee ee 


EQS 
















y PRREREERAE 
;PRG3 - SINGLE CHARACTER MAINTENANCE MODE DATA TEST. 
+ RERERRHRES 


PC RDO T ;GET TEST CHAR AND DELAY FROM USER. 
MOV (St + NO DELAY. 


SP) +, TEMP2 
EMP2+1. CRBUFA MOVE DATA CHAR TO CRBUFA. 

“2 sMOUTIN :GO OUTPUT, RECEIVE, AND CHECK CATA. 
\. 


| 


w 
m 


2 ie 3SRPTR sSee Ir PLT ee 


E ; BRANCH 

STALL :SET. DO A RANDOM STALL. 

TIMETX s TIME OUT TX DO 

ERROR ERRUR DONE NOT SET ia 

BIS 8172 aTXCSR :SET MAINTENANCE BIT 

157 ORXBU X DONE 

MoV CRBUFA, 2TXBUF tai XBUF . 

ISR “MASKET “MASK OFF NON TRANSMITTED SITS 

TIMERX : TIME OUT RX DONE 

ERROR : ERROR CONE NOT SETTING b 

MOV ORXSUF,CRBUF = MOVE CHAR IN RX SUPPER TO CRBUF. 
a pRTCHE e i COMPARE Bot cte ANC RECEIVED DATA 









, 

S352 Beha 
3937 915050 
2928 915056 
2923 015064 
2930 015072 
2931 915100 
2932 015106 
2933 015113 
3334 915120 
2935 915126 
2936 015134 
2937 015142 
2938 015144 
2939 915152 
2940 015160 
2341 015164 
es42 915172 
2943 015206 
eo44 015206 
45 915214 
2946 01520 
2947 DiSec6 
2948 915234 
2349 015235 
2950 915237 
2351 O15044 
2952 015047 
3953 915254 
3954 015262 
2955 015266 
2956 015274 
2957 015277 
2958 015304 
2959 015312 
2369 015320 
2961 015306 
2962 15334 
2563 15342 

5356 


0! 
2873 015434 
2574 015436 
C1S444 
e976 015451 
2977 OI E4E6 
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ars ae a 


051505 
O42Se3 OS2116 


020049 O20040 020040 
O20040 020040 de004C 


050131 920105 
O40 


S01 
ison O20122 
047045 047117 020105 
047506 O471eS Oe2S04 
124 
O40 a 950040 


O40 OeCG40 d209040 
O20040 051040 041530 


020049 020040 d20040 
020040 i00 
OSO04S evitt 


O40503 O4610e 027105 
054324 051503 Oediee 
040 


ic 
Q20049 20040 
C2004C OS344C O05iS01 







;ASCII MESSAGES 
MTIT: ASCII ‘“DLIL-E,C/D OFF LINE TEST - MAINDEC-11-DZ2CLA-Ex' 









-ASCII ‘““MAP OF DEVICES PRESENT%2° 


MOEVAD: .ASCII ° a)" 


e&) 


PGMSG: .ASCII ‘““TYFE IN PROGRAM NUMSER 


MNONE: .ASCIIT °%NONE FOUND*.3° 


EMO: -ASCII °xT° ; 

ATNUMS: .ASCII ° PCs ° 

APC: ASCII RXCSR= 
MRXNUM: .ASCII a “ 


POTIT: .ASCIZ °%PRGO - INPUT-OUTPUT LOGIC TESTS. 


ASCII *%DISCONNECT DLI1-E FROM MODEM’ 







»ASCII ° AND CONNECT JUMPER TO CABLE. %a” 


ATXCSR: .ASCII ‘*TXCSR S/B: ° 
ATXSB: .ASCIE ° WAS: * 





o1s4e4 
c1S466 


015516 


16050 


o— bb bh 





MACYLL 20k 
Pil 


320040 


1887 
020040 
040527 


051117 
040524 


040 
020040 
041130 


020040 


020040 


£1123 
eat 
020040 
035123 
020040 


050123 
047049 


032440 
047101 
046101 
027104 
051440 


040527 


043125 
020040 
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ATXWAS: 
ARXCSR: 


ARXSB: 


ARXWAS : 
ETXTIM: 


ERXTIM: 


PITIT: 


SELCAD: 


ERDAT: 
AASB: 
AWAS: 


ARXBUF : 









-ASCIT 
-ASCIT 
-ASCIT 


-ASCIT 
-ASCIT 


ASCII 


-ASCIT 


~ASCIT 


ASOT! 


Mawes 


-ASCIT 
-ASCIT 


-ASCIT 
~ASCIT 


ASCII 


GOS 


2’ 


*RXCSR SVB: ° 
WAS: ° 






. a’ 
*TX SPEEDS NOT IN ASCENDING ORDER. 3’ 


"RX SPEEDS NOT IN ASCENDING ORDER. a’ 


“%*PRG1 - TRANSMITTER SCOPE LOOPS" 


**“PRG2 - RECEIVER SCOPE LOOPd" 


““TYPE TEST. CHAR. CODE IN BiTS 15-8, TYPE CELAY TIME IN SITS 7-2" 


"*OF AN OCTAL WORD.”2° 


"DATA SB: ° 
, WAS: ° 


e) 

















MAIN, MACYLL 27(732) 

O2DLAF.P11 
3034 916124 o4o040 
3035 O16126 O51445 
3036 016134 051505 
3037 16148 bei590 
3038 O16150 o44524 
3039 016156 o47D4C 
3040 0161649 020114 
3041 016172 952101 
3042 016200 05151 
3043 O16206 92011 
3044 016214 030040 
04S 016222 J22460 
3045 O16225 —  O4S 
3047 Olbese OS1i22 
3048 016240 047522 
3049 O16246 920105 
3050 016254 0521 
3051 016262 O46le 
3052 016270 0475 
3053 916276 020124 
3054 016304 o405e2 
3055 016307 O45 
3056 016314 o20122 
3057 O163e2 O47101 
3058 016330 0515 
3059 916336 052116 
3060 016344 040056 
3061 O16346 O44445 
3062 O16354 O42111 
3063 016362 051107 
3064 016370 046105 
3065 016376 027104 
3065 O16401 207 
3067 O1e402 o4e44s 
3068 016410 051501 
3069 016416 2004 
3070 O1s424 O20040 
2071 O16432 936440 
3072 916436 20040 
3073 16444 051503 
3074 15452 20040 
3575 O16460 20040 
3076 O16466 951117 
3077 O16473 O40 
3078 916500 o20040 
3079 916504 O2244s 
3080 916512 051455 
3081 016520 020105 
3082 016526 o46440 
3083 016534 oO4B440 
3984 16542 040504 
3085 016550 051505 
3086 016554 d22445 
3087 O165b2 O514s55 
3988 16670 o44s0e 
2089 O16676 47125 


RABAT 
SSSR 


020124 


25-FEB-76 








042040 
04210 


u 


047503 
020124 


043517 
051440 


042525 
046191 
047See 
042524 
OSO94G 


C42516 
OS4122 


4 
020340 


0S2040 
032107 
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ASETSR: .ASCII 


-ASCIT 


RINCRT: .ASCII 


AINCPG: .ASCIT 


APGEND: .BYTE 
-ASCIT 


APCNT: .ASCII 


ACLIN: .ASCII 
APRXC: .ASCII 


APVEC: .ASCIT 
P3TIT: .ASCII 


PYTIT: ASCII 





207 
**END PASS = ° 

















HOS 


**SET DESIRED SR OPTIONS. NORMAL CFERATION ° 


*IS WITH SR = O00000%a" 


*%INCORRECT ROUTINE SELECTED, PLACE CORRECT PROGRAM 


*%IN SR O-2 AND PRESS CONTINUE.2" 


*“INVALID PROGRAM SELECTED. 3° 


LINE = 

'  RXCSR = ° 
VECTOR = ° 
_ 


*“%PRG3-SINGLE CHAR MAINT MODE DATA TESTS" 


*%*PRGY-SPEC BIN COUNT MAINT MODE DATA TESTS" 



















MAIN. 
DZDLAF.Pi1 


we 


QONONOOKOVOVOVOVO0000 
Oh bb bo 0 he 


_ 
N 
= 
uw 
<= 


oooooeooo 


KES SOO VRR OR BVO RRO Saw NOU cw - ODD EOD LOD SRR LOLS 
oO 
ee — 
: : 
ia®) 


WWIWWWWWWIWWWIWOIWW WOW WIIG WWW WI WOW) WWGIW WWW WWUIGIW UW 
hs he ee ee bn he bs be be = be b= 2 be bb bo be he bo bs Be bo me be B= pe be bs peo 


a ee ee ee 


MACY11 276732) 


047111 


Ce0124 


020124 


042040 
042524 


051124 
020104 


020040 
040522 


0 
020055 


047515 


052101 


052123 
042520 


020040 
020105 


020105 
040S27 


027105 
047522 


O40S2e 


050101 
047524 


020040 
050120 
047522 
020040 
020040 


042040 


044124 
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SELCAR: 


LDLINE: 


ALINE: 


SELINE: 


MSETRX: 


MSETTX: . 


MSETC: 


MTERR: 


MTO: 


MFROM: 
MNOLIN: 


~ASCIT 


-ASCII 


-ASCIT 


-ASCIT 


-ASCIT 


-ASCIT 


-ASCII 


-ASCIT 


-ASCII 
-ASCIT 


-ASCIT 
-ASCIT 








".TYPE IN TEST CHAR. CODE. “9° 






**TYPE IN LINE NO. a’ 


**%LINE NO.’ 
* WAS SELECTEDQ’ 





*“ZRECEIVER SPEED CHECKQ”’ 


*%ZTRANSMIT SPEED CHECKQ” 






*“SET CLOCK SWITCHES TO POSITION, THEN PRESS CONTINUE.2” 


"“ERROR - UNEXPECTED TRAP 


*“%TRAPPED TO ° 


*Z”ZTRAPPED FROM PC 


tf a’ 
**NO DEVICE PRESENT - THIS LINE NO.2” 





-MAIN. MACYL1 271732) 
OZOLAF.P11 


314% 017246 051511 
3147 017254 020105 
3148 017262 022477 
3143 017265 ON 
é 

3121 817505 888128 
3152 017303 O45 
3153 917310 030040 
3154 017313 04S 
3155 017320 930440 
3156 017323 04S 
3157 017330 931040 
3158 017333 —_ O4S 
3159 017340 031440 
3160 017343 OMS 
3161 017350 932040 
3162 017353 O4S 
3163 017360 032440 
3164 017363 O4S 
3165 017370 033040 
3166 017373 04S 
3167 017405 033440 
3168 017403 O45 
3169 O174i0 o4e526 
3170 O17416 051106 
3171 O17424 053517 
3172 O17432 O44 
3173 O1744G 100 
3174 017442 
3175 p009c! 


ee ES SS AS 


2S-FEB-7S 10:49 PAGE 61 


046040 
047516 


047516 
051} 


051105 
052514 


047111 
040056 


044440 
os2s22 


036440 
036440 
036440 
036440 
OS6440 
036440 
036440 
036440 
arte 


042522 


DTERR: 
INTER: 
MSO: 
MS1: 
MS2: 
MS3: 
MS4: 
MSS: 
MSE: 
MS7: 
MPWRF : 





4H 
ASCII 
ASCII 
ASCII 
ASCII 
ASCII 
“ASCII 
ASCII 
ASCII 
ASCII 


JOS 


»9xQ" 

*“%NO INTERRUPT’ 
*“CS = OQ’ 

*“CS = 1a’ 

"”CS = 20" 

*“CS = 3a’ 

*ZCS = 4a’ 

**CS = Sd’ 

*“*CS = 6a’ 

*“CS = 79’ 


**RECOVERED FROM POWER FAILUREY’ 
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DZDLAF 


MACY11 2 
Pll 
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14948 


2643 


1517 


1572 


18768 


1908 
1598 


2183 
2184 


1574% 


1915 1317 19188 


1600% 


2188 2193 2198 
2189 e194 2139 


2203 2208 2216s 
2204 2209 2216% 


2 


224% 





22338 


-MAIN. MACYL1 27(732) 25-FEB-76 10:49 PAGE 64 
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AINCPG 016346 
AINCRT Q16225 
AJA 00707e 


19478 
16278 


2028% 


2060 20628 


19998 


16908 


012464 34 2345 2350 2355 2360 2365 23738 





MOS 
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012506 
2341 2346 2351 2356 2361 2366 2373% 2379% 23838 


171% =: 17168 
2410 = 24198 


1741 17438 














- MAIN. 
DZDLAF .P11 


7 

AUAC 013032 
AVAA 013054 
AVAB 013112 
AVAC 013114 
AWAA 013134 
AWAB 013164 

AC 013174 
AWAD 013210 
AWRE 013214 
AWAS 016103 
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AT3S 011776 
136 . 


e 
26148 





2520 





m wowwmmu 
04 0-40-40-40 40 -40-4 


COOMOOOCOIOICE IO , t 
a “RRR EER 1: e : == } » “1040 
‘ iz: Ze 2% ( at r 
Linn 42 . ™ ‘ = 
. o-20-+ ry o =< e 
& c “ 





910940 
BOSEOS 
554636 


ou0cCo1 
090082 


Q0200C 
OC4930 


929954 


ee ee 


AANATS 
wee ee 


oooce5 


Se 


JoCO4O 


s3ea@2+5 
‘ 


002706 
5 
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o- 
~je~- 
sz 


OCU »-(D 


“IW ODOWOVUMOWOWOWO »-uI 


“Ie o 

>- P= b-- of o- 

0UI @M.00M0W0 mom 

ro L£07WOOCr wut 

Oe WwWwOtuIctw wo 
.0O.0G)~ 


@W.00D 
-~- “300 


<0 
*—e- 
wun 

wo 


furu 


--fUe-e—T1) bo oo fe 


“I 
o- 
fw 
i 
“Sy 
oe 
Ww 


-~ 





3 
— 
2 
= 
=) 


rufue- 


62 
45 
Ss 





furulue-e— e- 
ane ot cary 
oO UN 3 8: 
Uae ee 
(OU) -(e--O 


iow 
fowl 
UU le-- 


Mr 


COB 
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eMAS2S0 «6901342 5408 = 
MASE] 901944 S4is 
CmaSe2 001346 S4ee 
Mss | O01359 E45e 
CMRSSY =OCI252 sve 
xwasss 001369 cust 
Swasse 901366 cuca 
CmMaSe” 993360 S478 
Rmass 001310 B278 
oMAS3O «6OO13b= S488 
Reas3i 501364 cuss 
<mes3 001366 ec0e 
Euasas O01370 cgi 
x Be tasS SSc8 
: 1395 ceSs 
Kunese 501376 Sh 
CMAS3/ 6001400 ssss 
oMASH = O01 Slé S2gs 
ease | Sorat Soe 
.. AS eo = > 
CMAS? Bei ase 5318 
cMeT D14des 2210 2367.eeeee ‘ 
eMPTNG 914514 2829 2831 2833 2335 es3? 2338 2842s 
CMFTOK 914520 2841 28438 
CNVOTR §D04742 17S# 1178# 11978 
ONT 208322 le73 12798 
COUNT  O01624 $348 979% 935# 396 
CRBUF  CO1SS6 615s 12)8# 1306 1309 2718 2919+ 
CRBUFA 901560 Sl6s lel3e 13299% 1308 1313 ev7i3#  2893% 
| ERBuFE 50182 Elves 1303 «15091317 : 
VITRO 09i564 618s 1209 iee0e 21748 23314 2709% 27208 
CTRL OO:S&é 6198 2179 2336% 2828 2830 
xo! 001572 6208 e2184# e34le 2830 2832 
| CTR Sols7e Sele cl89% eEes46# 2832 2834 
| CTRS 001574 S228) «62194e = =623S1]* =§=6—2834 2836 
CTRS 00157 S238 2199% e356# 2836 2839 
| CTRE 001806 be48 e2e04# e361# 2838 2840 
Ere? oid g5su Senge © FaeGe © ENO 
| CURTST 001454 Sgls 77e 78 831# 
| Satan SDsoi2 1Bide 1221 
| DATCHK= 104304 4S28 1219 2719 + * 2920 
| SaTTS? O04770 12078 2695 
| BecvaL Oo4762 1170 Te0se Sanh 
| DELAY = LO4016 4628 820 1036 2249 2421 2562 28s’ 
; OiSIT  QOO4744 1i68* i191#  1i94# i155 11988 
| DLCONT 903772 101S# 1017 idz8s ; 
ifcy  S0a7ze B11 10158 
lSva 903750 1G2t8 1028 
'etva 003785 1oS18 1082 
iErve b= 766 i018 (ideee 
1 DOTHIS QOe21E 14188 2166 2322 
1 OToHK QO0S424 601 13038 
| OTCHYAR QOSS14 1307 13228 
| Eexoyy doeuse 1305) 308 
| DTERE 86 Ol 722 i205 2148s 
| ECORT §=8©6C3EDE 3848 gec 





me ee ee ee ee ee 





.MSIN, 


EdL 
EHLTA 
EMTA 








rad bes ea ; ere erNETeriery 

4: O20 
UU 
™” 








DeOLAF . P 


EHALT = 104010 
"hi Ac 


005704 
204003 


104015 
d95540 


avy 
“9 
a 
ao 


OoVOoo00CG § 
Oe 6 0 0 bo * 


C17cbs 
001452 
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MSOLS 










_1330e 13318 









1450 «1488s Ss1532ssISHB = s1SH3ssS69)=Ss«S79.s«dSE9SSSH «1598 
1626 «1843 s16GD EES = 16791884 = 1689) st705—Sss1710Sss«a17iS «1738 
1759 «1784 «=s«1763)Ss«a1785~=—ss1800)Sss18iS = 1830 sB4S = 1869 )=— 97S = i953 
19161934) sd14s194ESES 1875881992) 1998) 2015) 2023 
e649 205) a0b] «= eins «Bill = 2142) i4e = 2143) 2iS2 2063-2255 
2302 6308-'si3989sisGS HOSS 2419 BHI? Bua HES HSB 3513 
26525800 bil «= 3633 G42 2658) 267971] =I? aTHECCC27ES 
2825 89122918 

e088 «= ales «= B212 2369 

3440 3%Hi<i«<‘i HD 





5% 22338 1467 
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apt 
SE 

Di&74 
MSETTX 018773 
MSO 017303 
MS1 £17313 
mse (017323 
MSS ci7333 
MS& 017343 
mss 017353 
MSE 017363 
Ss? 017373 
MTERR 917197 
MTIT 015034 
MTC 017154 
f Aanea4o 
) 021462 
ORCNY O04474 
ORCNVA OO4510 
QACNYX DOWEEO 


SEK : ietateit 


peeks 


2 =900007 
t f 


un © - 2 ana ee fe ge fs 
*O 
| 
w 
4 
“ 
© 
IC 
ches 





0.00100 \)-~J0” 


fise-- Oro 
je Ge 
Wwoe-u 
(> -(900" 
(e+ le - 
Cotudgdo 


fue 








DOA U oO UD UO U 


t 


INO. WMO: 


me ope ode ode eo) 
2 kIT 
Z 


vv" 
eal 
, - a 
NG 
= .. 
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SF PLt 


O:5184 
O043S2 


Be 


00S250 


50042 


~ 
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578 


403 


oe oe ae ee ee ae 





Me-tu 
fue--tu 
7 
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919 Slee 
909% Sl3s 
94 997 

8708 

B7ls 

1165 1186 
77 77) 
319 1218 
2718 2215 
2397 2401 
726 730 
1050 1207# 
1681* 1682 
17235 1739% 
1828 1843 
1913 1930% 
1984 1988# 
2043 2047 
ee3S 2298 
e606*  cb09 

?bl# 2762 


— oO 





Tew 
7 


fuGse-tNO® oWotu 


~ 


ee 
~Jeu 
rar 


™I~3" IGIGIUIC) Wu 
woe ne ie 


fTUrulue— ee 
. 
ne 
TUMUTUTUe-- bb 
Turululeye-- o-o— --9— 
aa 


a 














.MSIN, 
DIOLAF . 


RXLVL 
RXVTR 
SAVREG= 
envne 


wn 
“4 
os 
~ 
neu 
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Pll 


001422 
Q 


00117 
104011 


000174 
092210 
90 


OO1b1E 
001620 


011762 
004110 


= 104017 
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873 
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6908 


1236 


1381 


2673 
e&e3 


2824 


983% 


1973 
1717 
799 


1263% 
2118 

14i1*# 
2832% 


1943 
2058 


996 
2954 
1744 

so4 


28228 


1264% 


387 
2869 
1771 
1084 





989 
2832 


1786 
i238 


1967 
2378 


ruronme- 
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TIMETX= 104020 
TIMEX  O04106 


OO1416 
001414 


001604 


104300 


104001 


= 00003 


pee eee 
- - 
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fone 
dofuru 


= 


fururu ror 
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XOR 002676 731 Sils 

XORA 002020 654 6708 

XORADD 001276 514% 657% 72% 

XORFLS Q02916 £58* 6698 673% 788 1S11 2778 27 

. = 017442 3898 405 408% 414 4698 4728 4748 4768 6678 v41 S42 Lidl 1120 
i2il Ad. 1969 2151 2218 ee2i 2375 2398 2402 ei07 e412 2416 28is 





we ae ee ee | ee 


MAIN, 
DZOLAF.P11 
TSTA 6868 
oes 
234 
2661 
TSTAA 6778 
1789 
2235 
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PAGE 77 
1534 1$50 
Lead 1877 
e384 e424 
2748 2769 
1$35 1551 
1855 1878 
2385 2425 
2749 2770 


——— 
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WORD 658 


ERRORS DETECTED: 0 
- DEFAULT GLOBALS GENERATED: 0 


xDZDLAF . DZDLAF/SOL/CRF=DZDLAF 
RUN-TIME: 10 22 S SECONDS 
RUN-TIME RATIO: 74737=1.9 
CORE USED: 12K (23 PAGES) 


BO? 


Sp oc ryntia , BD 3S ead igk writes, 76 ty : 


te. me ae, “a, pm, boas } ‘7A 19) 

SOUOUUUUOUUUUUUUUUUUUL asad BOUE SED EDU SCOUNOL GN NSC DCN ONS, SoU DICUDL ONE VL 1111 
- MUMMY CECT 

—— a= PITRE EK <5 Sap mmemanrar ott 5SS66b! DO00000000 


SOUOUOUL sTurslafere'ulete'ers{ofeve'ejetelafe\efofa sft cetera aleteltaleleteleafatereteetate ] 111 1 


SSSHYEYH4HHHHSSSSSSSSSSEGEEEEEEEE Pre SoSeeee88s333sssssssccooccesae | 





